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SOLVE PROGRAMMING PROBLEMS 
THE WAV YOU THINK. 

PURE AND SYMBOL. 




APL*PLUS®/PC 
IS THE ANSWER. 

The shortest distance between 
two points is a straight line. But 
unfortunately, that's not the case 
in programming. 

Most languages require you to go 
through an enormous number of 
steps before an idea becomes reality. 

That's why the APL* PLUS/PC 
System is such a dramatic and 
exciting software tool for serious 
PC programmers and application 
developers. 

Instead of requiring you to 
learn— and write— long-winded 
and complicated programs, APL is 
based on your instinctive ability to 
deal in symbols. And once you 
begin using APL's quick notations, 
you'll find it the ideal programming 



environment for all your applica- 
tion needs. 

The incredible shortcuts you'll 
get with APL not only make you 
more productive, but make pro- 
gramming enjoyable. Intricate 
calculations and modeling on PC's 
are a snap. You'll spend less time on 
drudgery, and more time creating. 

Only with APL* PLUS/PC, do 
you get: 

• full-screen editing 

• a built-in terminal emulator 

• communications 
•graphics primitives 

• and report formatting. 
Writing time-consuming 

programs like sorting, ma- 
trix inversions, and string 
searching is eliminated. 
APL's concise notation 



already provides these. . .and more. 

No wonder a PC Magazine re- 
viewer enthusiastically reacted to our 
APL* PLUS/PC System with 
"awe and delight." 

So will you. The complete pack- 
age price is $595 and major credit 
cards are accepted. 

Act now and we'll send vou a free 
Convincer Kit. Contact your local 
dealer, or call 800-592-0050 (in 
Maryland, call 301-984-5123) to 
order your system, or for more in- 
formation about our other 
APL PLUS •WARE™ products- 

from our UNIX™ version 

to our new streamlined 

Pocket APL™ 
You'll see how symbol 

they are to use, the very first 

time you use them. 




Problem-solving at the speed of thought. 



^•l^P^ APL* PLUS/PC System requires 192K. A soft character set can be used for computers with IBM compatible graphics board. A character generator ROM or 
91 9\l software is included for the IBM PC or selected compatibles. 

a conim comply PLUS * WARE and POCKET APL are trademarks of STSC, Inc. APL * PLUS is a registered service mark and trademark of STSC. Inc. UNIX is a trademark ot 
AT&T Bell Laboratories. 

CIRCLE 121 ON READER SERVICE CARD 



Software development isn't a 
mountainous task once you 
eliminate the high C errors. 



When you can find and fix bugs at 
the earliest possible moment, creating 
software stops being such an uphill grind. 

And the Smart/C Environment makes 
it possible. It's a complete, fully-integrated 
development environment for C that saves 
you from the creativity-inhibiting cycle 
of edit, compile, re-edit, re-compile, link, 
load, test, re-edit, re-compile, etc., ad 
infinitum. Smart/C puts the fun back in 
programming, because you spend your 
time creating... not waiting. 

Here's why. Syntax errors are elimi- 
nated automatically as code is entered. 
Smart/C's highly integrated editor and 
interpreter allow you to interpret your pro- 
gram at any time in the creation process, so 
logic errors can be ferreted out as soon as 
the algorithm exists — long before any 
compile, link, or load. 

The complete integration of the edi- 
tor and interpreter means you can stop 
anywhere in the interpret axle, edit, and 
then go right hack into the interpreter 
exactly where you left off. Not only that, 
the screen-oriented user interface lets you 
see all operations, even interpretation, 
right on the listing of the code. 



And to make maintenance program- 
ming easier, Smart/C's Migrator allows 
existing C code produced with any editor 
to be modified and run within the Smart/C 
Environment. 

All of which makes Smart/C an excel- 
lent tool. It's flexible, non-restrictive, and 
lets you create elegant, readable, error- 
free programs that you can watch run with 
a great feeling of satisfaction. 




Smart/C 

Free 
Demo Disk! 



To fully appreciate Smart/C, you have lo see it in 
action. For your free IBM PC MS-DOS demo disk, call 
us. Or write us on your company letterhead. 
AGS Computers, Inc., Advanced Products Division, 
1139 Spruce Drive, Mountainside, NJ(T092. 
80O-AGS-1313. In NJ, 201-654-4321. 



Smart/C Features 

The Smart/C Environment 

n fully integrated editor and interpreter 

□ Only one load brings litem both in 

□ One command set 

Q Move between one another at will 

Syntax Directed Editor 
O vi-like command set 

n Automatically provides formats for blocks,/or, 
case and i/statemenis 

Interpreter 

□ Current module can call external modules during 
interpretation 

□ Has Include capability 

□ Totally precompilation — no incremental compile 

□ Can interpret partially defined files allowing for 
rapid prototyping 

□ Variable speed of interpretation 

D Multiple windows with user-defined sizes 

The Smart/C Migrator 

lj Allows C code produced with any editor to he 
interpreted by Smart/C 

□ Reformats for readability 

Smart K has heen ported to UNIX'" System V Release 2, 
Berkeley 4.2, Xenix/" and MS-DOS. Versions run on 
8086- and 68000-based machines, as well as proprie- 
tary architectures. Smart/C runs on PCs. micros, 
supermicros, minis, and even mainframes. 

Tradtmirks— Smari/C: AGS Computers, tat. : UNIX: ATST Bell tibs: 
Xcnii ind MS-DOS: Microsoft Corp; IBM PC: IBM Corp 
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Speaking Lisp 

by John R, Allen 

Traditional languages, like FORTRAN or Pascal, are much less con- 
fusing to the human reader ... or so the claim goes. In this article, we 
explore the deeper semantic issues that separate LISP from the pro- 
gramming language mainstream. By studying a specific example — how 
to compute a sum given a finite sequence of numbers — we can observe 
LISP's powerful style of computational notation. 

Logic at a Glance, Part I 

by Jim McCarthy 

An electronic decision table provides many of the same qualitative 
experiences to the user thai electronic spreadsheets do: a visceral sense 
of control, the feeling of instantaneity, rapid-fire accuracy, and the joy 
of liberating latent programming skills. In this first installment of a three- 
part series, Jim McCarthy examines the structure and value of basic 
decision table programming. He will contribute the complete source 
code to a prototype editor, interpreter, and compiler. 

Natural Language Software 

by Darryl Rubin 

If you have ever written a compiler, you will recognize immediately that 
natural language processing can be divided into three phases: lexical, 
syntactic, and semantic analysis. In this article, we will study the particu- 
lar problems posed by implementing this new technology on micro- 
computers and look at two natural language data base programs on 
the market which try to tackle these problems. 

Learning about PROLOG 

by Ramachandran Bharath and Margaret Sklar 

A PROLOG program consists of declarations of relationships between 
objects. During program execution, PROLOG draws logical deductions 
from facts or relationships the user has supplied. The purpose of this 
article is to give an indication, through simple examples in PROLOG, of 
what is distinctive about the PROLOG programming style and to look at 
why it is especially suitable for user-friendly applications. 
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Mighty Macro 
Assembler* 



The new Microsoft® Macro 
Assembler package. A complete devel- 
opment environment that makes 
you a more productive programmer. 
Whether you're using Macro Assembler 
or any Microsoft high level language. 

A common calling convention lets 
you easily call assembly language 
routines from any high level Microsoft 
language to add an extra burst of 
blinding speed. 

Better Debugging. 

The new Symbolic Debug Utility 
lets you stay close to the source. Now 
you can step through your assembled 
or compiled code by name rather than 
by address. Source level display for 
Microsoft Pascal, FORTRAN, and C 
allows you to view both your original 
source and the resulting code. 

And we stuffed our package with a 
full set of the most useful utilities 
around. So that you can link, maintain 
and organize your programs like 
never before. 

Who else but Microsoft could build 
so much into one package for $150? 

For the name of your nearest Micro- 
soft dealer call (800) 426-9400. In 



Washington State, Alaska, Hawaii 
and Canada, call (206) 828-8088. And 
if you re already MICROSOFT 

USing MlCrOSOlt The High Performance Software™ 

or IBM® Macro Assembler, ask us how 
you can upgrade to the mightiest Macro 
of them all. 



Microsoft Macro Assembler Package: 

Macro Assembler 

♦For the 8086/8087/8088 and now the 186/286/287. 

♦ Define macros. 

♦ Conditional Assembly. 

♦ Case sensitivity tor symbols. 

New Interactive Symbolic Debug Utility 
•Controlled testing environment for debugging. 

♦ Source line display of Microsoft FORTRAN, Pascal and 
C Programs. 

♦Set breakpoints on line numbers and symbols. 
♦Single step to follow program execution. 

♦ Disassemble object code. 

♦ Display values. 

♦Make minor changes without reassembling. 
New Program Maintenance Utility 

♦ Rebuilds your applications after your source files have 
been changed. 

♦Similar to UNIX™ Make utility. 

Library Manager 

♦Create, organize and maintain your object module 

libraries created with Microsoft Languages. 

♦ Set page size (default of 16 bytes). 
Object Code Linker 

♦Simple overlaying linker combines relocatable object 

modules created using Microsoft Languages into a single 

program. 

♦Load Map generation. 

♦Specify from 1 to 1024 segments. 

Cross Reference Utility for the Macro Assembler 

♦Creates a cross-reference listing of the definitions and 

locations of all symbols used in an assembly language 

program. 




Microsoft is 3 rejristered trademark and T}>c High 

Performance Software is a ttaderrcark of Microsoft 

Corporation IBM is a registered trademark of 

International Business Machines UNIX is a trademark 

of Bell Laboratories 
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reat news! 
I have a special 
announcement 
that will interest all those readers who 
have written in stating they think 
COMPUTER LANGUAGE should print 
alongside its articles any listings referred 
to in the magazine, regardless of their 
length. This announcement is for those 
people who either do not have modems or 
who are not interested in making the long 
distance telephone call to our remote bul- 
letin board computers to download the 
code. 

We've started the COMPUTER 
LANGUAGE Users Group . . . 

From now on, and for all the issues 
we've published in the past, all the code 
referred to in the magazine can be 
acquired in any disk formal by sending 
S6.50 for every 5 'A -in. disk and $8.50 for 
every SSSD 8-in. disk to: COMPUTER 
LANGUAGE Users Group, 13!Townscnd 
St., San Francisco, Calif. 94107. 

Just specify which disk format you 
would like the code converted onto, and 
depending on the amount of space your 
disk will hold, determine how many disks 
you will need lo purchase. Include the 
name and address where you would like 
the disks to be mailed. Each month, on 
this page of the magazine, you'll find a 
reference to how many kilobytes of source 
code the current issue's code consumes. 
The following table should be used as a 
guide: 

Volume Issue Size 

1 Premier '84 130K 

2 Oct. '84 42K 

3 Nov. '84 150K 

4 Dec. '84 140K 

5 Jan. '85 40K 



6 


Feb. '85 


190K 


7 


Mar. '85 


230K 


8 


Apr. '85 


230K 


9 


May '85 


150K 


10 


June '85 


80K 


11 


July '85 

(notincl. ERGO 
Logic Kit code) 


100K 


12 


July '85 

(ERGO Logic Kit 
code only) 


500K 


13 


All Code Swap 
Shops 


350K 



We sec the COMPUTER LANGUAGE 
Users Group as an ideal solution to solv- 
ing many problems at the same time: it 
helps us free up more pages in the maga- 
zine to publish a greater number of infor- 
mative articles, it allows readers to pick 
and choose the listings they need, and it 
allows us to provide readers with 
machine-readable listings on alt floppy 
disk formats so they can be used immedi- 
ately without the labor of rekeying. Hav- 
ing listings available on disks replaces our 
previous policy of mailing out printed 
listings. 

In addition to our comprehensive prod- 
uct analyses of Expert Systems, LISPs, 
and PROLOGS, this month features a spe- 
cial comparative review of the syntax and 
semantics of the LISP language vs. other 
mainstream languages, a massive source 
code contribution by Jim McCarthy on 
decision table software, an overview of 
the field of natural language software, an 
interview with AI innovator Terry Win- 
ograd, and a lot more . . . 

Many readers have expressed a desire 
for COMPUTER LANGUAGE to cover the 
AI field in greater intensity. Some have 
written in asking us to devote a column to 
artificial intelligence programming tech- 
niques and trends. What do you think? 

Your comments and criticisms have 
been extremely helpful to us in this, our 
first year of publication. Our warmest 
thanks! 




Craig LaGrow 
Editor 



Telecommunicate to COMPUTER LANGUAGE 

COMPUTER LANGUAGE has established two bulletin board systems for you to 
upload and download text and binary programs, as well as to leave your own elec- 
tronic Letter to the Editor. All the program listings referred to in every issue of the 
magazine will be available here. 

In addition, COMPUTER LANGUAGE has its own Special Interest Group on Com- 
puServe's national data base. After calling into your local CompuServe node, simply 
type "GO CLM" at any prompt and you'll be in our SIG. 

To access our bulletin board, set your computer or terminal to the following param- 
eters: 8 data bits, no parity, 1 stop bit. full duplex, and either 300 or 1200 baud. The 
telephone number is (415) 957-9370. After your modem makes the connection, type 
RETURN several times, and everything else is easy. 

Both systems are open 24 hours per day, 7 days per week. Due to the heavy number 
of callers, please do not log into the system more than one time per day. Messages left 
on either system will be combined the following day. 



Potent Pascal* 



Microsoft' Pascal may be the 
most powerful software develop- 
ment environment available for 
the MS-DOS system. It com- 
bines the programming advan- 
tages of a structured high-level 
language with the fast execution 
speed of native code compilation. 

And it exceeds the proposed 
ISO and ANSI standards with 
logical extensions that make the 
language more powerful and ver- 
satile. For example, programming 
capabilities even allow you to 
manipulate data at the system and 
machine level. 

It gives you single and double 

MICROSOFT. g re ™ IEE f E 

The High Performance Software IiOating pOlTAt 

arithmetic. Numeric operations 
take advantage of the 8087. Or 
automatic software emulation is 



provided if the coprocessor is not 
installed. 

Support for long heap alloca- 
tion and separate module compi- 
lation gives you the flexibility 
to create large programs up to 
one megabyte. 

And the standard linking inter- 
face makes it easy to combine 
Microsoft FORTRAN or assem- 
bly language subroutines. 

Call 800-426*9400 to order 
the potent Pascal* $300? 

In Washington State, call 206- 
828-8088. Ask for operator K5, 
who will rush you your order, 
send you more information, or 
give you the name of your nearest 
dealer to see Microsoft Pascal in 
action. 



* Price exclusive of Handling and Washington Siace sales tax. 
Microsoft is a registered trademark and MS is a trademark of Microsoft Corporaiion 
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Turbo 

/j QVUPU™ mh Turb0 ASYNCH. you can be in constant 

nV I #Wt#ff foucfr iv/f/? rte world without ever leaving 
the console. Rapid transit at its best. Turbo ASYNCH is designed 
to let you incorporate asynchronous communication capabilities 
into your Turbo Pascal application programs, and it will drive any 
asynchronous device via the RS232 ports, like printers, plotters, 
modems or even other computers. Turbo ASYNCH is fast, accurate 
and lives up to its specs. Features include. . . 

♦ Initialization of the COM ports allowing you to set all transmis- 
sion options. ♦ Interrupt processing. ♦ Data transfer between cir- 
cular queues and communications ports. ♦ Simultaneous buffered 
input and output to both COM ports. ♦ Transmission speeds up 

to 9600 Baud. ♦ Input and output queues as large as you wish. 

♦ XONiXOFF protocol. 

The underlying functions of Turbo ASYNCH are carefully crafted 
in assembler for efficiency, and drive the UART and programmable 
interrupt controller chips directly. These functions, installed as a 
runtime resident system, require just 3.2K bytes. The interface to 
the assembler routines is written in Turbo Pascal. 

The Turbo Pascal PERFORMANCE PACKAGE 1 " is for the serious 
Turbo Pascal programmer who wants quality tools to develop appli- 
cations. Every system comes with a comprehensive User Reference 
Manual, all source code and useful sample programs. They require 
an IBM PC or compatible, utilizing MS-DOS version 2.0 or later. 
There are no royalties for incorporating PERFORMANCE PACKAGE 
functions into your applications. 

Turbo POWER TOOLS and Turbo ASYNCH sell for $99.95 each, 
and they may be ordered directly from Blaise 
Computing Inc. To order, call 
(415) 540-5441. 




Turbo 



Turbo POWER TOOLS is a DilWCD T/Jill C 

sleek new series of procedures tUWCft 8 UULO 

designed specifically to complement Turbo Pascal on IBM and com- 
patible computers. Every component in Turbo POWER TOOLS is 
precision engineered to give you fluid and responsive handling, with 
all the options you need packed into its clean lines. High perform- 
ance and full instrumentation, including. . . 

♦ Extensive string handling to complement the powerful Turbo 
Pascal functions. ♦ Screen support and window management, giv- 
ing you fast direct access to the screen without using BIOS calls. 

♦ Access to BIOS and DOS services, including DOS 3.0 and the ■ 
IBM AT. ♦ Full program control by allowing you to execute any 
other program from within your Turbo Pascal application. ♦ Inter- 
rupt service routines written entirely in Turbo Pascal. Assembly 
code is not required even to service hardware interrupts like the 
keyboard orclock. 







Hs. ^X ot^K tfW*> 




l name 
I 






■ 



BLAISE COMPUTING INC 

SaJia _#W WmJK 

CIRCLE 3 ON READER SERVICE CARD 



wv'2 '—~ — exp . w*-^z~- — 

1-» -r RftP. #"-^ — -~~^^Z~*-~ !■"? *""" ' 7hiSq PSSX3) is a (.'SScmri ^; 8vr i'w 

\JVSft Oi H lu ™ ^ — •*^* totsaatiotttl. Ttft® POWER TQQR TsR 

L* ' _p- — ■ "* " Ai YtJCh ;> ■ P&'W.WjX PACi'AQi : 

* *"*^ hatiem&te of Sf3i<jE C&?B&li8Q (He -W is a ngHlen 

£m§ Cm 

tosotl tfft 

I 



.. Cotnpvttii Ins !BM % a figtiteied 

frj*rori Qf intefffliM Bvsine&s M&hinfa Cutporatiefi 
MS-OOS is a ttaOBwl ct Mrciosoti gorpomw. 




♦ 2034 BLAKE STREET 

♦ BERKELEY, CA 94704 

♦ (415)540-5441 



FEEDBACK 




:.••■:•:., 



*\ tSBE 



awa 






BASIC recursion 

Dear Editor: 

1 am writing to comment on Hugh 
Aguilar's "BASIC Recursive Tech- 
niques" (May 1984. pp. 43-46). I Feel 
that several points need attention. 

■ Figure ! is referred to in the text as an 
English algorithm for the puzzle's solu- 
tion, but the figure printed is a picture of 
the disks and pegs. The cited algorithm 
was left out entirely. 

■ 1 don't know what Listing 2 is supposed 
to be— a replacement for the A. 1 and A. 3 
sections of the missing Figure 1 per- 
haps?— but it is hard to decipher with the 
= and + symbols not printed. (Alas, why 
won't typewriter makers understand pro- 
grammers so we won't have to keep 
remembering lo draw in the = , + , 

<. >.etc.?) 

By the way. the author calls this a trick: 
the wedge business and alteration of 
BASIC'S internal variable storage in the 
next section must be a veritable magic- 
show! (The portability of such a scheme 
must be practically nil.) 

■ The section beginning "A wedge is a 
method ..." rapidly descends into an 
area which involves having access to (and 
being more than a little familiar with) the 
source code to one's BASIC interpreter, 
something that even COMPUTER 
LANGUAGE'S elite readership might 
find it hard to come upon. 

■ Along those lines: If you are going to 
delve so deeply into the black box of the 
language's system software as to name 
specific interpreter source code labels 
(CHARGOT) and describe the inter- 
preter's internal memory management 
scheme, then we are definitely not talking 
about most BASICs but rather about one 
specific implementation. In this case you 
really must state which BASIC it is to be 
of more than minimal curiosity value to 
anyone. {I suspect the author refers to one 
of the 8086/8088 BASICs due to the lack 



of a stack area in Figure 2. Those imple- 
mentations probably use the separate 
slack segment for such purposes.) 
■ Listing 3. line 2050. is a pretty obscure 
way of saying the old standard : 

2050 IFINKEYS = ""THEN 2050 

Or. if you dislike GOTOs (as I suspect is 
the case here), then you could use: 



2050 WHILE 1NKEYS 



WEND 



Not to mention the fact that some lan- 
guage implementations (especially com- 
piled ones) don't recognize your alter- 
ation of a looping structure's control 
variable from within the loop. 
■ Most Microsoft BASICs (and several 
others as well) will properly handle recur- 
sive GOSt/flsduc to their use of a stack 
inlernally to manage the depth of nesting 
and the RETURN addresses. The problem 
is the need for dynamic local variables in 
each reinvokation of the routine (rather 
than the sialic global variables BASIC 
provides). This may be simulated by 
means of arrays for each variable with a 
global "nesting-depth" counter to be the 
subscript for them all, thus providing a 
sort of variable stack somewhat similar to 
the internal handling of such things by 
ALGOL-like languages. 

An example of this in Microsoft 
8-bit CP/M BASIC is available on the 
COMPUTER LANGUAGE Bulletin Board 
Service or CompuServe account. It runs 
without change on TRS-80 Models I. Ill, 
and IV. as well as PC-DOS and MS-DOS 
versions of BASIC/BASICA/GWBASIC. 

Also, you covered SNOBOL a few 
issues back (Premier issue, pp. 65-68). 
I saw in PC TECH Journal, and later pur- 
chased, a really nice implementation by 
Viktors Bcrstis for the IBM PC for only 
S39.95. plus postage and handling. (Min- 
nesota SNOBOL4, Berstis International, 
P.O. Box 44 1 , Millwood, New York, 
N.Y. 10546) 



let DISKS= DISKS-1: let A$= 0THER$: let 0THER$= 
DESTINATION: let DESTINATION$= A$: gosub HANOI: 
let DISKS= DISKS+1: let A$= DESTINATION: 
let DESTINATION$= 0THER$: let 0THER$= A$ 



Listing 1. 



I really enjoy your efforts and appre- 
ciate a magazine which makes me think 
instead of feeding me product reviews of 
dozens of things 1*11 never need and begin- 
ners' guides to choosing a modem, and 
the like. Keep up the good work. 

Chuck Somerville 
Dayton, Ohio 

Aulhor Hugh Aguilar responds: I would 
like to thank Mr. Somerville for reading my 
article with such interest. He has pointed 
out some valid typographical errors for 
which I take full responsibility, The English 
algorithm is submitted as follows: 

A. If DISKS is greater than zero, then 

solve by: 

A.) Moving DISKS-1 disks from 

FROM to OTHER 
A, 2 Moving the DISKS numbered 

disk from FROM to 

DESTINATION 
A. 3 Moving DISKS-1 disks from 

OTHER to DESTINATION 

B. End. 

Also see Listing 1 (to replace Listing 2 in 
the article), complete with plus and equal 
signs, and Figure I (lo replace Figure 3), 

If it makes you feel any belter, Mr. Somer- 
ville, I used the article money for a word- 
processor to replace my typewriter. 

It is important to differentiate between 
tricks and techniques. Techniques are por- 
table between languages. Structured writ- 
ing and the evolving design of compilers is 
Wt effort to close the gap between the tech- 
nique in the mind and the source on the 
screen. Because perfection in this effort 
hasn 7 been reached, application-specific 
tricks are necessary. 

In BASIC it is necessary to .simulate such 
things as WHILE . . , REPEAT, DO . . . 
UNTIL, and recursive procedures — 
which are an integral part of real languages. 
I picked up a good trick for simulating the 
DO . . . UNTIL loop in BYTE a few years 
ago. It works something like this: 

for 1 = to - 1 step - 1 

(block) 
1 = ( conditional expression): next 1 

This works when Booleans are represented 
as a negative one or a zero. I discourage 
the use of the INKEYS. Functions 
shouldn 't be affecting globals or I/O as it 
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does. Tliis can cause bugs when expres- 
sions are processed in parallel. 

Procedures, complete with locals, are 
harder to simulate. Mr. Someirille 's efforts 
can he seen in his HANOI program. My 
efforts are described in the article. An 
example of using a BASIC interpreter 
tricked in this way can be seen in my 
HANOI program. I feel thai my method has 
several advantages. 

■ 'Die chore of stack housekeeping is hid- 
den from the BASIC programmer. This 




makes his or her job easier and simplifies 
the porting of the application to another 
language. 

■ Tlie stack housekeeping is done in 
assembly and hence is much faster. 

■ Only locals are played around with in 
the block. Tile GOSUB sets up the refer- 
ence points to the globals. and the 
RETURN puts the computed values into 
the actual variables. This has an advan- 
tage over the Pascal or ALGOL method of 
using the reference points (passed with 
VARJ like variables. In a multitasking 
environment the RETURN can wait for a 
signal from the supervisor before changing 
the actual global variables and relinquish- 
ing control. 
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The Language of 
Artificial Intelligence 



Selected by Japan's Fifth Generation ICCT Project to create 
machine-based intelligence, Prolog is the most widely used 
artificial intelligence language worldwide. 
POWERFUL AND ELEGANT 

With over 70 predefined predicates, PROLOG V complies 
with the spirit and syntax of Edinburgh Prolog as described 
in Clocksin and Mellish's classic Programming in Prolog, 
the book that set the de facto standard for Prolog. 
IDEAL FOR CREATING: 
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o abstract problem salving 

D mathematical logic 



HARDWARE 
REQUIREMENTS 
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o 128 K RAM 
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c expert systems 

o natural language systems 

o biochemical analysis 

THE CHOICE OF UNIVERSITIES 

Generous University site licenses have made PROLOG V 
the choice of Universities from New England to Southern 
California. Send your inquiry on University stationery, or 
call for details. 

NO RISK OFFER 

Examine the package and documentation at our risk lor 
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product, return PROLOG V with the distribution diskette still 
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Cultural influence 

Dear Editor; 

I very much enjoyed your interviews 
with Donald Knuth and Niklaus Wirth. It 
is interesting that the differences between 
them arc not very great. I find myself 
more in sympathy with Knuth. probably 
because I learned programming on the job 
rather than in school. Very early on. how- 
ever, 1 learned the theory of structured 
programming and it has served me in 
good stead, 

Now that I have learned Pascal I am far 
more fond of il than my earlier languages, 
mainly because it makes possible very 
clear expression of structured algorithms, 
as Wirth intended. One thing aggravates 
me about Pascal, however— and this is 
exactly to the point that Knuth raises, the 
need to write for other people to read, not 
just for the computer to execute— namely, 
the need to look to the very end of the 
written program to find the topmost level 
of control structure. This may be due to 
Wirth 's design of a single-pass compiler, 
or perhaps it is a cultural reflection of the 
Germanic tendency at the very end of the 
sentence the verb to put, but it surely does 
not make for readable code! 

I much prefer to put the main level of 
control first in the text, then the major 
subroutines, then the more detailed levels, 
etc., followed by utility routines that are 
called from lots of other places. I sure 
wish Pascal would let me do this. 

Thanks for a stimulating and interesting 
pair of articles. 

Bill Meacham 



Parlez-vous Forth? 

Dear Editor: 

As a newcomer to both the Macintosh 
and MacFORTH. I read with interest 
"Hashing Out Forth with Charles 
Moore" (Mar. 1984. pp. 19-24). Ken 
Takara's question— "Do you have a lan- 
guage that you particularly like for its 
expressive qualities, something beyond 
the usual claims of efficiency or mere 
maintainability?"— brought to mind the 
following possibilities for the Forth lan- 
guage that I think few other languages 
could accommodate so easily. 

I live in a part of Canada where the 
principal language is French. This means 
that when I am scouring the local libraries 
for books to help learn programming, I 
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often end up reading books published in 
French, It has occurred to me that it must 
be difficult for non-English speaking peo- 
ple to learn computer programming when 
the key words of the major languages are 
in English. 

Given the compactness of Forth and the 
fact that many of the words are just char- 
acter symbols (@, !, :, etc.), it would be a 
relatively easy task to produce a Forth 
equivalent in almost any language. 

Synonyms can easily be created for 
most words just by a simple redefinition 
(Echange swap or maybe Sortie exit). 
This makes the word available in users' 
native tongue but leaves the original 
English word available if they should care 
to use it as they grow more familiar with 
Forth (or for other users in a multiuser 
environment). 

The character words could just 
be assigned a new pronunciation (for 
example, @ might become Chercher in 
French). The more complex words would 
require some redefinitions within the 
Forth kernel, but I don't think this poses 
any problem. 

Of course, in any application the higher 
level words would be given descriptive 
names in the user's native language, as 
happens now. 

Apple Computer has recognized the 
need to make its products more adaptable 
to people all over the world. The ability of 
the Macintosh to be reconfigured to for- 
eign character sets and the availability of 
the keyboard in many international ver- 
sions makes the personal computer a lot 
more personal to a lot more people. 

MacForth is a very creative environ- 
ment for programming the Mac. With 
Forth's adaptability and Apple's con- 
tinued interest in the educational use of 
computers, perhaps for the first time stu- 
dents everywhere will learn to program in 
their native tongue. 

This language adaptability also has 
some interesting prospects given the 
development of voice-activated comput- 
ers. One problem with this type of com- 
munication is that each of us speaks with a 
slightly different accent or pronunciation. 
A set of Forth synonyms might be created 
by each individual as he or she speaks the 
commands into a microphone. These syn- 
onyms would be phonetic profiles of an 
individual's pronunciation of a word and 
would be handled internally by the Forth 
architecture in much the same way as 
ordinary word definitions. Thus a user 
could "teach" the computer to understand 
an accent just as we humans are able to 
adapt our hearing to comprehend a wide 
range of accents. 

I believe that this ability of Forth to 
adapt to individual requirements, even to 
evolve into different native languages, 
gives it expressive qualities that arc 
unique. 

Gram Corriveau 
Pierrefoncls, Que. 
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UNIX to DOS 
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your 
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It's easy. Just get an industry standard file access 
method that works on both. 

C-ISAM™ from RDS. 

It's been the UNIX™ standard for years (used in 
more UNIX languages and programs than any other 
access method), and it's fast becoming the standard 
for DOS. Why? 

Because of the way it works. Its B+ Tree index- 
ing .structure 1 offers unlimited indexes. There's also 
automatic or manual record locking and optional 
transaction audit trails. Plus index compression to 
save disk space and cut access times. 

How can we be so sure C-ISAM works so well? 

We use it ourselves. It's a part of INFORMIX" 
INFORMIX-SQL and File-it!? our best selling data- 
base management programs. 

For an information packet, call (415) 424-1300. 
Or write RDS, 2471 East Bayshore Road, Palo Alto, 
CA 94303. 

You'll see why anything less than C-ISAM is just 
a compromise. 

— W^\™ 
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RELATIONAL DATABASE SYSTEMS, INC 

I lW6,HdaUomID«taba»Sys«eras,Iii(i.UNJXIs»usdensBicorAT&TBeBLaboraU3riea INFORMlXIs 

a rvgisH-iMl iRuiHiurii and illis. C-ISAM and File lUara trademark-- cif Relational Database Systems, Inc. 
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WALT 



The universal, super-efficient Lisp 
for PC-DOS, MS-DOS, CP/M-86 and CP/M-80 systems. 



Waltz Lisp is a very powerful and complete implementation of Lisp. It is similar 
to Franz (the Lisp running under Unix), and is substantially compatible with 
MacLisp and other mainframe Lisps. 



Easy to use. 



(2 Wh 



if!!fWBB% ln ndependeni lasts. Waltz Lisp 
\JiiliMSa9 was up to twentyf!) times faster 
than competing microcomputer Lisps. 

Built-in WS-compatible full 
screen program editor. Full 
debugging and error handling facilities are 
available at all limes No debuggers to link or load. 

Random file access, binary tile 
support, and extensive string 
operations make Waltz Lisp suitable for general 
programming A text-file difference program and 
other utilities are included m the package. 

/JfljlFSfll Functions of type lambda (expri 
^i"MaBu» nlambda (fexpr). lexpr, macro. 
Splicing and non-splicing character macros. Full 
suite of mappers, iterators, etc. Long integers (up 
to 611 digits) Fast list sorting using user defined 
comparison predicates Built-in prettypnnting and 
formatting facilities. Over 250 (unctions in all. 
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Superbly documented. 



Transparent (yet programmable) 
handling o) undefined function 
references allows large prog rams to reside partially 
on disk at run time. Optional automatic loading of 
initialization file. User control over all aspects of 
the system. Assembly language interface. 

| Each function is 
' described in detail 
The 300+ page manual includes ait exhaustive 
index and hundreds of illustrative examples. 



Order Waltz Lisp now-and receive free our 

PROLOG Interpreter 

Clog Prolog is a tiny (but very complete) Prolog 
implementation written entirely in Waltz Lisp. In 
addition to the full source code, the package 
includes a 50 page Clog Manual. 



16-bit versions require DOS 2.x or CP/M-86 and 90K 
RAM (more recommendedl 
Z-80 version requires CP/M 
2.x or 3.x and 48K RAM 
minimum Waltz Lisp runs on 
hundreds of different com- 
puter models and is available 
waltz usp i in all disk formats 




$169' 



'Manual only: S30 (refundable 
with order) Foreign orders, add S5 for surface mail, S20 
for airmail. COD add S3. Apple CP/M. hard sector, and 3" 
formats add S15. MC/Visa accepted. 

For further information or to order call 

'™ 1-800-LIP-4000 dept 30 3S 

In Oregon and outside USA call 1-503-684-3000 
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• INTERNATIONAL- 



15930 SW Colony PI . 
Ponland. OR 97224 
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Csharp Realtime Toolkit 




Realtime on MSDOS? Csharp can do it! Get the tools without operating system overhead. Cut development time with C source 
code (or realtime data acquisition and control. Csharp includes: graphics, event handling, procedure scheduling, state system 
control, and interrupt handling. Processor, device, and operating system independent. Csharp runs standalone or with : MSDOS, 
PCDOS, or RT11. Csharp runs on: PDP-11 and IBM PC. Csharp includes drivers for Hercules and IBM graphics boards. Data 
Translation and Metrabyte IO boards, real time clock, and more. Inquire for Victor 9000, Unix, and other systems. Price: $600 



I SYSTEMS 
B£GUILD 



Systems Guild, Inc., P.O. Box 1085, Cambridge, MA 02142 
(617) 451-8479 
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CROSS JTTHOUGHTS 



B+ trees, B+ + trees, and statistics in Al 



n last month's col- 
umn, we began a 
discussion on 
searching techniques thai employ tree 
structures. We indicated that binary trees 
were suitable tor memory-based searches. 
We also introduced the B-tree structure, 
which is used to perform a disk-based 
search. We ended our discussion by point- 
ing out that B-tree searching has its short- 
comings. While searching for single keys 
is still efficient, it is somewhat clumsy to 
road a number of keys in sequence. 

This month 1 want to discuss the B + 
tree and its improved search strategy. B + 
tree structures are used by a number of 
popular software products, such as dBase 
III. Borland's Turbo Toolbox, and many 
data management utility software librar- 
ies. In addition. 1 will present an enhance- 
ment of the B+ tree itself, which we will 
name the B+ + tree. 

Modification of the B-trcc was the 
result of a need to reinforce the ability to 
more easily obtain a complete or partially 
sorted list, including locating a certain 
sought key and then asking for the next or 
previous keys. This procedure dictates 
that the leaf pages become doubly linked 
lists, allowing their traversal to either the 
left or right. Simultaneously, we need to 
have copies of all the keys inserted in the 
tree's leaves. Keys that are located in node 
pages will be duplicated in the leaves. 
This is the first major distinction of the 
B+ tree: doubly linked leaves containing 
all entered keys. 

The second distinction comes from 
realizing that since node keys are dupli- 
cated in the leaves, we can strip the record 
data pointers from the node pages. This 
makes the data structure of node pages 
different from that of the leaves. By con- 
trast, the B-tree has the same structure for 
both page types. 

Figure 1 shows the B+ tree. Notice that 
keys in higher nodes are duplicated in 
each lower node. This duplication is nec- 
essary to locate the proper leaf containing 
a sought key, 

Searching through the B+ tree begins 
at the root page. The keys are read and 
compared with the search key. The out- 
come of the comparison normally leads to 
the next page node. There the same key 
comparison is carried out to select yet 
another page node. Eventually the 



By Namir Clement Shammas 

obtained pointer will lead to a leaf page. A 
final search in the leaf will determine 
whether or not the sought key exists. 
Thus, every search in a B + tree is equiv- 
alent to the worst case search in a B-trcc. 
However, this fact is not regarded as a 
serious drawback. Some people even 
praise the consistency of the real time 
involved in searching! 

Listing 1 shows the PPL code for 
searching in a B+ tree. The main Search 
procedure calls upon SearchNode and 
Search Leaf 'to scan the two different types 
of key pages. 

Growth of a B+ tree and a B-tree arc 
similar. Initially, there is one empty page. 
Keys are added and fill out the page. 
When an attempt is made to add a key to a 
full page, (he page keys read in memory 
and the new key is inserted in the key list 
so that a perfect sorted order is 
maintained. 

Next, the median key is selected, 
dividing the list into two halves. The 
lower half is written back to the old page, 
while the upper half is written to a newly 
created page. Pointers are used to estab- 
lish the double link between the leaves. 
The median itself is stored as the last item 
of the original page. A copy of the median 
key (without the data record pointer) is 
stored in a new. higher- 1 eve I node page. 
This makes the B + tree grow by one 
level. The page containing the median key 
becomes the new root page. A comparison 
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of the median keys will guide the search 
toward either leaf page. 

This scenario takes place during the 
early growth stages of the B-tree. When 
more keys are added, they arc inserted in 
the leaf pages. As each leaf page becomes 
full, it is split into halves and the median 
key inserted into the last location in the 
leaf pointing lo the parent node page. If 
the parent node page becomes full, the 
same operation is carried out. resulting in 
two new half-full nodes. Their median is 
inserted or used to create a new parent 
node page. 

Deleting from B+ trees is more com- 
plex than deleting from a B-trec. If the 
key deleted occurs in a leaf page only, 
then the operation is straightforward. 
Otherwise, we have two choices to make 
regarding the deletion of keys from node 
pages: 

■ Delete the key from the leaf page only. 
Keep the keys in the node pages, but mark 
their status. Marking can be done by alter- 
ing a status Hag during the search to locate 
the key to be deleted. Decide on a criteria 
for packing the B+ tree. 

■ Delete all occurrences of the key. This 
will involve some major rearranging in 
the node pages. 



N 



ow lei s turn our 
J attention to the 
| B+ + tree. Its 
structure serves lo limit the duplication of 
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kc> s and make deleting ke\ s more simple. 
The B+ + tree is different from ihe 13 + 
tree in the following respects: 

■ Each key in the node pages has only 
one duplicate, located in the leaf pages. 

■ The last stored key in each leaf is dedi- 
cated to duplicating node keys. 

■ Zoom pointers are attached to each 
node key. They point directly to the leaf 
page containing the key with its record 
data pointer. 

■ Nodes are doubly linked lists. 

■ Searching in a B+ + tree is not neces- 
sarily equivalent to the worst B-trce 
search. With a B+ + tree you need one 
more disk access than with a comparable 
B-free search. 

When dealing with leaf pages, we 
declare their capacity. MAX_KEY, in 
terms of keys that are not duplicated it! 
nodes. We deliberately save the 
(MAXKEY + 1 ) position to store the 
duplicate of a node key. 

Each node page is supplied with zoom 
pointers. If a search key equals a node 
key. then it is pointless to continue 
traversing node pages at lower levels. The 
zoom pointer has the address of the leaf 
page containing full information about the 
searched key. The latter is systematically 
located at the last "hidden" position in the 
leaf page. Figure 2 shows the B+ + tree. 

B+ + tree and B + tree searching are 
similar, with one exception: once the 
search key matches a node key. we use the 
zoom pointer to locate the sought leaf 
page and recall the last element in the leaf. 
Listing 2 shows the PPL code for search- 
ing in a B+ + tree. 

Growth of the B+ + tree is very similar 
to that of the B+ tree, with some differ- 
ences, such as additional zoom pointers in 
node pages. Allowing duplicate keys 
requires establishing dotihlc links 
between all pages. This is the price to pay 
for incorporating zoom pointers. 

When a leaf page is reached via a zoom 
pointer, its parent is unknown. Knowing 
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the parent is not required until the leaf is 
lull and we need to split the page and 
insert a copy of the median key into the 
parent node. Thus each leaf page must, in 
turn, know its parent. A similar argument 
is used for node pages also. In case of 
overflowing keys, each node page must be 
able to point to its parent. 

Deleting a B+ + tree key involves 
removing it from the leaf pages and any 
node page that duplicates it. This requires 
less node rearrangement than a B+ tree. 

ince this issue is 
.dedicated toarti- 
' ficial 

intelligence, a subject of fascination to 
many of us. I want to discuss some simple 
aspects of using statistics in heuristic 
systems. 

During the last decade, much of the 
programming I've done has revolved 
around the use of regression analysis in 
R&D. The major purpose of this work 
was to study the correlations between 
observed variables in an attempt to obtain 
mathematical models thai allow for future 
predictions. 

Attempting to determine the best model 
is much like detective work. Statisticians 
have devised simple and limited methods 
to select the best models. Complications 
arise due to two factors: applying mathe- 
matical transformations to observed data 
and the varying number of terms in a 
mathematical regression model. There is 
a vast number of combinations for the 
candidate models. 

I will discuss (he simplest case for a 
regression system that learns front experi- 
ence. This type of system stores the 
results of regression calculations and 
builds a performance history for com- 
peting regression models. 

Listing 3 shows the PPL code for the 
system used. The program is designed to 
consider a simple linear regression 
between two variables. For sim- 
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plification, only linearized models are 
considered, each having a slope and inter- 
cept, but applying different mathematical 
transformations. 

The system is designed to contain a 
fixed number of competing models. This 
is another simplification. The coefficient 
of determination is used to indicate the 
goodness of fit. Its values range from zero 
(meaning no correlation exists) to one 
{meaning a perfect correlation is 
obtained). 

Every time the program runs, it reads 
two data files. The first contains the per- 
formance history of the models. The sec- 
ond contains the observations to be pro- 
cessed. The program will process the data 
for each regression model. 

All models are used for the first few 
sets of data, because it is loo early to dis- 
qualify any model, The coefficient of cor- 
relation is obtained for each model and is 
ttsed to update the performance history. A 
value close to unity signals good perfor- 
mance. For the first few sets of data (three 
in our case) the program stops after all the 
models are processed. It is too early to 
start screening the models. 

On the other hand, when enough data 
sets have been processed, we begin model 
screening. We pick the best model, one 
with the highest average coefficient of 
determination. We compare all other 
models to the selected one. Using a simple 
statistical test, we determine, at a certain 
probability level, whether any other 
model's coefficient of determination has a 
statistically different value. If it does, that 
model is disqualified and barred from fur- 
ther consideration. This is done by alter- 
ing the MAP() identifier. After this is 
done, the loop that processes the data will 
bypass all disqualified models. 

This process will continue until a single 
model is found to fit. How soon we obtain 
the model that fits depends on many 
factors: 

■ The nature of the system studied. If 
simple linearized models are not really 
suitable, then the screening process may 
take much longer to produce a single, 
reliable model. Failing to do so is also 
meaningful. It tells us that there is a more 
complex correlation between the observed 
variables. 

■ The amount of data in each set 
processed. 

■ The accuracy of the processed data. 
Poor data will throw the system (and any 
human) off. 

These factors reflect a simple heuristic 
system that learns by storing intermediate 
results and uses statistical methods to 
draw conclusions. Its limitations include 
the inability to vary the number of terms 
in the mathematical regression model and 
to deduce what mathematical trans- 
formations should be used. This area will 
be discussed in a future column. H 
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PPL code for searching in a B+ tree 
. B+ tree 

— DATA TYPE DECLARATION, Pascal style 

Leaf_Rec = RECORD 

Leaf_Left, Leaf_Right, Count_Leaf_Key: INTEGER 

LeafJCey : ARRAY[ 1. .MAX_KEY+1] OF Key_Data 

Leaf_Ptr : ARRAY [ 1. .MAXJJEY+1 ] OF INTEGER 

END RECORD 

Node_Rec = RECORD 

Count_Node_Key : INTEGER 

NodeJCey : ARRAY[1. .MAX_KEY+1] OF Key_Data 

Node_Ptr : ARRAY[1 . .MAXJCEY+1] OF INTEGER 

END RECORD 

— VARIABLE DECLARATION 

Leaf : Leaf_Rec 
Node : Node_Rec 
ROOT, HEIGHT, MAXJCEY, NUM_PAGE : INTEGER 



PROCEDURE Search ( Sough tkey : Key_Data 

ROOT, HEIGHT : INTEGER 

VAR Found : BOOLEAN 

VAR SoughtLeaf, Sought_Loc : INTEGER 

VAR Leaf : Leaf_Rec) 

— Search procedure for B+ tree 



Found = FALSE 
IF HEIGHT > THEN 
INITIALIZE: None 
LOOP 

— loop will conduct gradual descent in B+ tree 
BEGIN IF HEIGHT <= 1 THEN EXIT END IF 
READ "B+TREE_Key_File" , ROOT, Node 
SearchNode(SoughtKey , Node , Found , Sought_Loc) 
ROOT = Node.Node_Ptr[Sought_Loc] 
HEIGHT -= 1 
END LOOP 
TERMINATE: SoughtLeaf = ROOT 

READ "B+TREE_Key_File" , SoughtLeaf , Leaf 
SearchLeaf (SoughtKey , Leaf , Found , Sought Loc) 
END IF 
END Search 



Listing 1 . (Continued on following page) 
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PROCEDURE SearchNode(SoughtKey : Key_Data; 

Node : Node_Rec; 
VAR Found : BOOLEAN; 
VAR Sought_Loc : INTEGER) 

BEGIN 

IF SoughtKey < Node.Node_Key[ 1 ] 
THEN 

Found = FALSE 

Sought_Loc = 1 

ELSE 
INTIALIZE: Sought_Loc = Node.Count_Node_Key 
LOOP 

BEGIN IF (SoughtKey >= Node.Node_Key[Sought_Loc]) OR 
(Sought_Loc <= 1) THEN EXIT END IF 
Sought_Loc -= 1 
END LOOP 

TERMINATE: Found = (SoughtKey = Node.NodeJCey[Sought_Loc]) 
END IF 
END SearchNode 

Listing 1. (Continued from preceding page) 

PPL code for searching in a B++ tree 

B++ tree 

— DATA TYPE DECLARATION, Pascal style 

Leaf_Rec = RECORD 

Leaf_Left, Leaf_Right, Count_Leaf_Key, NodejVbove : INTEGER 
Leaf_Key : ARRAYfl. .MAXJCEY+1 ] OF Key_Data 
Leaf_Ptr : ARRAY[ 1 . .MAX_KEY+1] OF INTEGER 

END RECORD 

Node_Rec = RECORD 

Count_Node_Key , Parent_Node : INTEGER 
NodeJCey : ARRAY[1. ,.MAX_KEY+1 ] OF Key_Data 
Node_Ptr, ZoomPtr : ARRAY [ 1. .MAXJCEY+1 ] OF INTEGER 

END RECORD 

— VARIABLE DECLARATION 

Leaf : Leaf_Rec 
Node : Node_Rec 
ROOT, HEIGHT, MAXJCEY, NUM_PAGE : INTEGER 



PROCEDURE Search (Soughtkey : Key_Data 

ROOT, HEIGHT : INTEGER 

VAR Found : BOOLEAN 

VAR SoughtLeaf, Sough t_Loc : INTEGER 

VAR Leaf : Leaf_Rec) 

Listing 2. (Continued on following page) 
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Found = FALSE 
IF HEIGHT > THEN 
INITIALIZE: None 
LOOP 

BEGIN IF HEIGHT <= 1 THEN EXIT END IF 
READ #2, ROOT, Node 

SearchNode( Sough tKey, Node, Found, Sought_Loc) 
IF Found THEN HEIGHT = 1; ROOT = Node.Zoom_Ptr[Sought_Loc] 
ELSE HEIGHT -= 1; ROOT = Node.Node_Ptr[Sought_Loc] 
END LOOP 
TERMINATE: SoughtLeaf = ROOT 

READ #2, SoughtLeaf .Leaf 

IF NOT Found THEN SearchLeaf (SoughtKey, Leaf , Found, SoughtJLoc) 
ELSE Sought_Loc = MAXJCEY + 1 
END IF 
END Search 

— Procedures SearchNode and SearchLeaf are identical to those used 

— with the B+ tree. 

Listing 2. (Confirmed from preceding page) 

PPL code for a heuristic statistical system. 
PROGRAM SMART_SYSTEM 

— Program to study the best model to correlate observed 

— variables X and Y. The models used are of the following 

— general type: 

f(Y) = intercept + slope g(X) 

— where f(Y) is some function of variable Y. 

— where g(X) is some function of variable X. 

— Performance history file contains the following information 

MAX_M0DEL : the maximum number of models compared 
Remainin g M odels' : The number of remaining models 
MAP(): A string containing MAX_MODEL characters to map the status 
of each model. If position i has "Y" then the model is 
still considered. Otherwise it is disqualified. 
Model records composed of the following: 

Sum_R2 : Sum of the coefficient of determination values 

— Sum_Sqr__R2 : Sum of the squares of the coefficient of 

determination values 
Model_Name : A string containing the model name. 

— N is the number of data sets processed 

— X() and Y( ) are the arrays for the observations. 

Listing 3. (Continued on following page) 
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BEGIN 

Read performance history file 

IF Remaining_Models = 1 THEN DISPLAY "One model, program stopped" 

Halt program 
END IF 

Read observed data file 
N += 1 

INITIALIZE: None 
LOOP <Model> 
BEGIN For Model = 1 TO MAX_M0DEL 

INITIALIZE: Set statistical summations to zero 

i = 1 
LOOP <Data> 

BEGIN IF (i > Num_Data) OR (MAP(Model) <> "Y") 
THEN EXIT <Data> END IF 
CASE i OF 

WHEN 1 => Xreg = X(i); Yreg = Y(i) — Linear model 
WHEN 2 => Xreg = Ln(X(i)); Yreg = Y(i) — Exponential model 
WHEN 3 => Xreg = X(i); Yreg = Ln(Y(i)) — Logarithmic model 
WHEN 4 => Xreg = Ln(X(i); Yreg = Ln(Y(i)) — Power model 
END CASE 

Update summations with values of Xreg and Yreg 
i += 1 
END LOOP <Data> 
TERMINATE: None 

Calculate Slope, intercept and coefficient of determination, R2 
Sum_R2 += R2; Sum_Sqr_R2 += R2 * R2 
END LOOP <Model> 

IF N > 3 THEN 

Best = index of model with highest average R2 value. 
INITIALIZE: Display "Best model is";Model_Name(Best) 

Table_T = "Tabulated" Student-t value calculated 
at (N-2) degrees of freedom and 
selected probability level. 
LOOP <Compare> 
BEGIN For Model = 1 to MAX_M0DEL 

IF (Model <> Best) AND (MAP(Model) = "Y") THEN 
— Calculate Student-t statistics 
Terml = Sqrt(2/N) 
Term2 = Sqrt( (Sum_Sqr_R2(Best) + Sum_Sqr_R2( Model) 

- Sqr(Sum_R2(Best))/N - Sqr(Sum_R2(Model) )/N) 
/ (2 * N - 2)) 
CalcT = (Sum_R2(Best) _ Sum_R2(Model) )/(N * Terml * Term2) 
IF ABS(CalcT) > Table_T THEN MAP(Model) = "N" 

Remaining_Models -= 1 
END IF 
END IF 
END LOOP <Compare> 

TERMINATE: Display all models still in competition 
END IF 
END SMART_SYSTEM 

Listing 3. (Confinued from preceding page) 
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Slash Programming Time in Half! 

w,h FirsTime 

• Fast program entry through single keystroke statement generators. 

• Fast editing through syntax oriented cursor movements. 

• Dramatically reduced debugging time through immediate syntax checking. 

• Fast development through unique programmer oriented features. 

• Automatic program formatter. 



FirsTime is a true syntax directed editor. 

FirsTime ensures the integrity of your programs by 
performing all editing tasks like moves, inserts and 
deletes along the syntactic elements of a program. 
For example, when you move an IF statement, 
FirsTime will move the corresponding THEN and 
ELSE clauses with it. 

Even FirsTime's cursor movements are by syntax 
elements instead of characters. The cursor automati- 
cally skips over blank spaces and required keywords 
and goes directly to the next editable position. 

FirsTime is a Syntax Checker 

FirsTime checks the syntax of your program 
statements, and also: 

• Semantics like undefined variables and 
mismatched statement types. 

• The contents of include files and macro 
expansions. 

• Statements for errors as they are entered 
and warns you immediately. 

FirsTime is a Program Formatter 

FirsTime automatically indents statements as they 
are entered, saving you from having to track indenta- 
tion levels and count spaces. 



FirsTime has Unique Features 

No other editor offer these features: 

The Zoom command gives you a top down view 
of your program logic. 

The View command displays the contents of 
include files and macro expansions. This is 
valuable to sophisticated programmers writing 
complex code or to those updating unfamiliar 
programs. 

FirsTime's Transform command lets you change 
a statement to another similar one with just two 
keystrokes. For example, you can instantly trans- 
form a FOR statement into a WHILE statement. 

The Move at Same Level command moves the 
cursor up or down to the next statement at the 
same indentation level. This is very useful. For 
example, you can use it to locate the ELSE 
clause that corresponds to a given THEN clause 
or to traverse a program one procedure at a 
time. 



FirsTime is Unparalleled 

FirsTime is the most advanced syntax directed 
editor available. It makes programming faster, easier 
and more fun. 




TO ORDER CALL (201) 741-8188 

or write: 



Spruce Technology Corporation 



189 E. Bergen Place 
Red Bank. NJ 07701 



In Germany, Austria and Switzerland contact: 

Markt & Technik Software Verlag 
Munchen, W. Germany 
(089)4613-0 



FirsTime is a trademark of Spruce Technology Corporation * MS-DOS is a trademark of Microsoft Corporation 
IBM is a trademark of Iniernational Business Machines. Inc • Turbo Pascal is a Trademark of Borland International 
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More Power Than You Thought Possible 

Arity offers the first serious implementation of Prolog for IBM personal computers. Arity/Pro- 
log is a powerful, highly optimized, and extended version of the logic programming 
language Prolog. Imagine building software applications with a language that solves prob- 
lems through deduction and logical inference. The task of creating complex programs is 
much faster and easier, resulting in lower development costs'. Arity/Prolog is now in use in a 
wide range of applications in industry, business, research, and education. The solution— 
the Arity/Prolog Interpreter: 



Source level debugger 

Virtual databases, each 
with a workspace of 16 
megabytes 

Floating-point 
arithmetic 

String support for 
efficient text handling 




I Interface to assembly 
language and 'C 

■ Text screen 
manipulation 

I Integrated program- 
ming shell to MSDOS 

■ Comprehensive set of 
evaluable predicates 

■ Definite clause 
grammar support 



Arity/Prolog Interpreter $495.00 

Arity also offers the Arity/Prolog Compiler and Interpreter, a sophisticated development envi- 
ronment for building Al applications. Essential for producing fast, serious production code. 

Arity/Prolog Compiler and Interpreter $1950.00 

The Arity/Prolog Demo Disk is available for $19.95. ■ Arity/Prolog products run on the IBM PC, 
XT, AT, and all IBM compatibles. ■ To order, call (617) 371-2422 or use the order form below. 



=— Cirity COrpOratiOII 358 Baker Avenue, Concord, MA 01742 



Organization 



Quantity 



Product 



AMytProlog 

Compitor & Interpreter 



Anty'Prolog 
Interpreter 



Arily/prolog 
Demo Dish 



Unit Price 



S 19.95 



Enclosed is a check or 

money order to Arily Corporation 



Please bill my 
I Mastercard □ Visa H American Express 



Account* 
Valid I 



Subtotal 

MA residents add 5% sales Ian 

Total Amount 



Total Price 



Please send me more information about 
Arily and Arity/Prolog 



— — Cirity 358 Baker Avenue, Concord, MA 01742 



m-ao-:| 
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COMPUTERVISIONS 



Al innovator Terry Winograd 



By Doug Millison 




rtificial intel- 
ligence pioneer 
. Terry Winograd 
doesn't intend to put programmers out of 
work by designing the next generation of 
computer languages. "They'd just 
laugh," he says. "Programmers know you 
can't automate them out of existence." 
But while they may be spared the irony of 
being replaced by computers, program- 
mers can expect a scramble to keep up as 
Winograd's research revolutionizes the 
state of the art of software. 

Sitting in his computer science depart- 
ment office at Stanford University in Palo 
Alto, Calif., his desk overflowing with 
galleys of his most recent book, piles of 
newspaper clippings, and literature 
related to his work against military fund- 
ing of university computer science 
research, Terry Winograd speaks quickly, 
hurrying to make his words keep up with 
the flow of his ideas. It's a level of 
excitement and enthusiasm he's main- 
tained since he laid eyes on his first com- 
puter back in 1965. 

The whiz kid from Colorado has been 
fascinated by numbers as long as he can 
remember. His first encounter with a 
computer came in college while he was 
working on his B.A. in mathematics. 
"There was a doctor at the local hospital 
who moved to our town from a larger uni- 
versity and brought with him a Control 
Data 160 with 4K of 12-bit memory, a 
paper-tape reader, and a paper-tape 
punch," he recalls. The doctor called Col- 
orado College to see if they had any bright 
students who might be interested in work- 
ing with the computer to help with his 
research project on cancer radiation 
therapy. 

"I knew nothing about computers or 
programming," he says. "What 1 got was 
the machine and the instruction manual 
for the machine. I learned to program the 
thing by punching the console buttons. I 
used to have the repairman in every cou- 
ple of weeks to repair the bullous, and 1 
don't think he ever figured out what was 
going on." 

His Ph.D. dissertation, published in 



1970 out of the Massachusetts Institute of 
Technology, Cambridge. Mass., was a 
pioneering effort in the field, demonstra- 
ting how successful AI programs could be 
within a restricted domain. The dis- 
sertation centered on SHRDLU. a LISP 
program to take English commands and 
questions and give answers. Winograd 
wanted to design a program that would 
enable an imaginary robot hand and eye 
system to recognize, locate, and manipu- 
late a universe of colored cubes and pyr- 
amids existing as a model within the com- 
puter itself. In SHRDLU. Winograd 
addressed the task of designing a system 
with which humans could communicate in 
natural language. 

Responding to a request to place one 
block on top of another, SHRDLU would 
assess the universe of blocks on the table, 
develop a strategy, then execute it. The 
program could answer questions about its 
moves, carrying out the conversation in 
simple sentences and appearing to under- 
stand questions put to it, then generating 
appropriate responses. "SHRDLU was a 
milestone forme," Winograd says, "and I 
think it was for the lab and AI in general 
because it pulled together a lot of the ideas 
that had been floating around in AI into a 
very visible, concrete program." 

His choice of SHRDLU as a name for 
the program reveals a subtle sense of 
humor and a streak of irreverence. 
SHRDLU happens to be the seventh 
through 12th most frequently used letters 
in the English alphabet, after E T A I O N. 
In earlier days of Linotype machines and 
hand-set type, keyboards were arranged 
in that manner instead of the QWERTY 
arrangement of today's typewriters and 
terminal keyboards. Instead of tediously 
going back to correct mistakes, type- 
setters would insert SHRDLU several 
times tojumble the line of text, counting 
on the proofreaders to throw out the line. 
Occasionally the proofreader would miss 
it, resulting in the absurd repetition of 
SHRDLU SHRDLU SHRDLU. 

"I first saw it in Mad magazine. They 
started using SHRDLU as a nonsense 
name for some stupid character or some- 
thing. I wanted a name for my program 
that wasn't an acronym, just a sequence of 
letters with no intrinsic meaning." he 
savs. 
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1 MIT, Winograd 
had found him- 
l self working in 
the most exciting arena in computer 
research. Notorious in the annals of the 
history of computing, the AI Lab at MIT 
harbored a generation of researchers 
whose work shaped the AI field we know 
today. 

The PDP-6 in the iab had become the 
center of cult like devotion for those bit- 
ten by the bug. Because there was only 
one computer and a small number of ter- 
minals, competition became intense 
among those who wanted access. In his 
book Hackers, Heroes of the Computer 
Revolution . Steven Levy describes two 
opposing groups at the lab: the graduate 
students—disciples of the IBM batch- 
processing military research mentality, 
interested only in their applications pro- 
grams and academics— and the hackers — 
renegades dedicated to exploring the lim- 
its of the machine in an unrestricted 
atmosphere of anarchistic freedom. 

Winograd remembers straddling the 
fence. He was a graduate student working 
hard on his applications-oriented AI 
research for his Ph.D. But his ability to 
hack code gave him a grudging respect for 
the hardcore hackers, and thev found 
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SHRDLU, his pioneering AI program, an 
"interesting hack." 

"There was definitely the sense of 
'Let's sec what we can come up wiih' that 
led to everything from Space War to the 
artificial intelligence research I was 
involved in." he remembers. 

Developments in the industry since 
those early days at MIT have rendered 
moot much of the hacker-vs. -computer- 
establishment debate. Although Winograd 
finds the hackers vs. IBM dichotomy 
far too simplistic to characterize what was 
happening at the MIT AI Lab. he says that 
real issues lurking behind that metaphor 
still haunt decision making in computer 
research policy today. 

"The cost/benefit view says you take 
your resources and figure out what's 
going to be useful to somebody. On the 
other .side is the idea that you find the peo- 
ple who are best qualified to play with the 
computers and tell them. 'Do whatever 
you can.' Nobody but the most extreme 
hackers would say the U.S. government 
should set up a billion dollar fund to let 
the hackers play." he observes. 

Winograd agrees that hackers repre- 
sented a useful reaction to the IBM men- 
tality of regarding the machines with awe 
and deferring to their keepers as if to high 
priests of some arcane religious cult. But 
he sees a downside to hacker anarchism in 
its inability to meet society's needs for 
computer research. 

"I think the negative side of the hacker 
thing is that it really doesn't connect with 
what it is that people can do and want to 
do with computers," says Winograd. "It's 
purely technology-driven: what can you 
make the machine do, whether or not it's 
relevant to anybody. We need to drive the 
technology from an understanding of the 
social situation, not just pursue tech- 
nology for its own sake. Fortunately, 
computing now is cheap, you have 
anarchy by default. Anybody who can go 
buy a Macintosh or PC or whatever can 
start doing things, interesting things." 

In those early days at the MIT AI Lab, 
the possibilities for truly intelligent 
machines seemed almost unlimited, if 
only enough resources were applied. The 
years since have seen changes in the field 
of AI itself and in Winograd's 
expectations for AI. 

"Nobody can say, 'It's been 10 years 
and we now have this big wonderful AI 
program that does all these wonderfully 
intelligent things.' If you believe in AI, 
things look good, and if you don't believe 
in it, you sec stagnation." he says. 

Winograd sees two distinct and funda- 
mental developments in AI. "First, there 



has been a recognition that there arc a lot 
of salable things you can do that don't 
involve real intelligence," he observes. 
"There's been a mass diversion of effort 
away from the larger AI problem and into 
expert systems, front ends, things which 
are much more limited but which you can 
sell." 

The second development concerns the 
atmosphere surrounding AI research. "I 
think among the main people in the field 
there is much more caution than 10 years 
ago. Now people like [Marvin] Minsky 
and [Roger] Schank say, 'This is very 
hard, it's going to take a long time, we 
really aren't there yet," where 10 years 
ago they said 'We're going great, we're 
almost there.' There's been a definite shift 
of mood," Winograd says. 

Winograd does not 
apply for or accept any 
Pentagon funding for 
his research. His view 
is that the military way 
of doing business and 
looking at the world 
has a negative impact 
on researchers and on 
society as a whole. 

Many observers were deeply critical of 
the early claims of AI researchers. They 
challenged the belief that machines could 
think or be considered intelligent. They 
questioned the existence of any clear 
understanding of "intelligence" or 
"thinking" on which meaningful research 
could be based. In his book What Comput- 
ers Can V Do, philosopher Hubert Dreyfus 
argued that the overoptimism about AI 
and expert systems is based on a mis- 
understanding of what it is that people do 
when they are "intelligent" or "expert." 
Winograd's colleague Joseph Wei- 
zenbaum elaborated a moral argument in 
Computer Power unci Human Reason , con- 
tending that some tasks ought to be 
attempted only by humans. 

Winograd began exploring the potential 
and limits of computers and how to dis- 
tinguish what computers do from human 
thought. "I have really come much closer 
to a way of looking at AI like Weizenbaum 
or Dreyfus, as opposed to the gung-ho 
MIT AI Lab spirit." Winograd says. 

With a background in linguistics as well 
as math and computers. Winograd was 
acutely aware of how the words and con- 
cepts we use shape the way we think about 
computers, how the metaphors we employ 
tend to channel and circumscribe the pos- 
sibilities we envision for computers and 
for the people who are supposed to use 
and benefit from computers. He addresses 
these and other questions in a new book to 



be published this summer, Understanding 
Computers and Cognition , Co-author 
Fernando Flores, a former finance and 
economics minister in the Chilean govern- 
ment of Salvador Allendc. had been 
instrumental in a large-scale project to 
apply cybernetic theory to practical man- 
agement problems. 

"To oversimplify, if I say, 'This 
machine is making judgments' and you 
want to know what the machine is really 
doing, I have to reply, 'It's doing these 
calculations.' Now, there's a pressure to 
say that these calculations constitute mak- 
ing judgments. This pushes out of the pro- 
gram and out of our notion of what it is the 
program should be doing, things which 
can't be formulated in calculations. We 
devalue the currency by saying 'This 
computer is teaching,' or 'This computer 
is making judgments." This affects our 
expectations of what people should do 
when they do the same things," Winograd 
explains. 

Underlying AI research is the rede- 
finition of intelligence to include 
machines. Winograd warns this could 
change the way wc deal with children and 
education. "If intelligence is defined as 
the ability to do problem solving, modeled 
as a heuristic search in a problem space, 
then education will focus on those things 
that increase rational problem-solving 
skills in areas where those skills are basic. 
Writing a computer program is a very 
good context for that," he explains. 

The danger is that educators might shy 
away from contexts where rational prob- 
lem solving does not work so well, which 
includes most interpersonal skills. "It 
turns out that rational problem solving is 
usable, but it doesn't tell you the whole 
story. It's like the old saying that if you 
have a hammer, then everything in the 
world looks like a nail," says Winograd. 
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ust as our under- 
standing of com- 
puters changes 
our definition of intelligence, so our con- 
cept of the human mind itself has been 
reformulated to follow the computer 
model. Current brain research takes for 
granted a view of the brain as a compli- 
cated network of information-processing 
circuits. 

Winograd has thought deeply about this 
"mind as machine" metaphor. In it he 
sees two different part-truths that have 
been combined. The first is the belief that 
the mind is mechanistic, with no soul or 
vital force. Given the state of religion and 
secular humanism in society today, this 
mechanistic view of the brain is more or 
less taken for granted. The second is that 
digital computers operate in a way that 
can be characterized elegantly as bytes, 
bits, transmission, logical choice, rational 
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Now Supports Microsoft 3.0 



$149.95 




Windows that open, close, grow/ shrink, move & scroll. 

Input validation, formatting, editing & processing. Help 
messages by field, by key word & from help file. Date & 
time math, attribute control, pull down menus, and more! 



Now even your simplest applications can easily include 
features that you didn't used to have time or patience enoug 
to tackle. Vitamin C is more than a library full of building 
blocks. It is a well planned, tightly woven set of high 
level functions for quick results PLUS low level rou 
tines for complete control. Complete source code, 
no royalties. Great manual with tutorial and 
call \ reference. Sample programs too! For 

TODAY ! N. Microsoft 3.0, CI-C86, & Lattice C. / Programming 

Or send 149.95+S. Call for Other versions,. yf Box 112097 

S3 shipping and ^^systems & $TQduCtS^y^ Canollton, Tx 7501 1 

handling. Texas add ' , . — "^ (214)243-6197 

sales Lax. MasterCard and Visa accepted. Extended Technical support available. 
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"INSIGHT is essentially the equivalent or better than 
any other tool available for the personal computer." 

Paul Harmon aultior o( Expert Systems. Artificial intelligence, in Business 



Turn your PC into an expert. 

Give it Insight, or give it Insight 2. 

Both let you create knowledge base 
systems using any PC-compatible 
text editor. 

Insight not only simplifies access 
to lots of information, it analyzes 
and offers solutions. For entry-level 
operators it's a perfect procedural 
training package to help build 
and implement knowledge base 
software. 



ID 



Level . 
Five 
Research, Inc. 



Insight 2 is more than just an 
"expert." It's a knowledge base 
engineering tool with application 
capabilities. It can call up Pascal 
programs, read and write dBASE 11 " 
files, and its decision-making pro- 
cess can tie in directly to your 
existing databases. Run-only ver- 
sions also can be developed and 
distributed. 

Two unique packages from the 
same expert idea. 

Insight '" ($95) and Insight 2 '" (S485) 
run on the IBM *'PC, DEC" Rainbow, and 
Victor ■" 9000. 



macintosh 

Programmer's 

Librarg 

Affordable, Reliable 
Tools for Programmers 



From the author of Pascal/MT+ 
Tardis Software presents the 

Mac Programmer's Library 

A collection of tools for the 
serious Mac programmer, Tools 
which save you hours of work 
written by an experienced 
Macintosh programmer, Tardis 
Software is committed to giving 
you reliable tools at a good 
price. Order 3 and save 10%, 
order all 5 and save 20%!. 



The Macintosh Programmer's 
Library current contents: 

■ FastFinder - command -line 
oriented user -interface. 

■ ToolPak 1 - diff, search dump 
ASM xref, librarian 

■ ToolPak 2 - c beautifier, tool 
subroutines <C source) and 
Cxref 

■ C-leaner - expert system 
program, tells you where and 
how to optimize existing code 

■ MacMake - program maint. 
utility, simplifies re-builds 



All are $49-95! and are 
AVAILABLE HOV 



MC/Visa. COD's and POs add 
$5 for handling. Price incl. 
UPS ground, Blue Label add $5 



Tardis 



Soft'tfBxe 



2817 Sloat Road 
Pebble Beach, CA 



(408) 372-1722 
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4980 South A-l-A 



Melbourne Beach, Florida 32951 



(305) 729-9046 
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problem-solving, and information How. 
Therefore, the equation goes, the mind 
must be that kind of machine. 

Winograd finds it plausible that there 
might be a strictly mechanical explanation 
for what the brain docs. But that doesn't 
automatically lead to the conclusion that 
brain function corresponds to the way a 
computer is structured into information- 
processing elements. "You can't say, 
'This element sent that message of so 
many bits to that element, because the 
brain isn't constructed using those prin- 
ciples." he explains. 

Winograd feels the current vogue for 
the left-brain/righi-brain model is a par- 
tial retreat from the mind as machine 
metaphor. Those who believe that the 
mind is basically a computer now claim 
only the logical left half of the brain is. 
leaving the intuitive right brain for those 



fuzzy-minded individuals who can't swal- 
low the whole machine. 

Winograd sees a further danger accom- 
panying the implementation of expert sys- 
tems. Computers are increasingly seen to 
be infallible, and people, especially 
bureaucrats, find it easy to hide behind 
the computer. Responsibility is shifted 
away from the people who are responsible 
for policy and onto [he computer in which 
decision-making power has been 
embodied. Problems arising from inter- 
actions with expert systems could lead to 
legal disputes, as in trying to ascertain 
who is responsible for the mistakes made 
by a medical AI program or the disasters 
resulting from a doctor's decision not to 
follow the expert system's advice. 

The example of a medical expert sys- 
tem is a good one to illustrate Winograd's 
current thinking on AI. End-user perccp- 



CP/M-80 C Programmers . . . 

save time 

. . . with the BDS C Compiler. Compile, link 
and execute faster than you ever thought 
possible! 



If you're a C language 
programmer whose patience is 
wearing thin, who wants to spend 
your valuable time programming 
instead of twiddling your thumbs 
waiting for slow compilers, who 
just wants to work fast, then it's 



time you programmed with the 
BDS C Compiler. 

BDS C is designed for 
CP/M-80 and provides users with 
quick, clean software 
development with emphasis on 
systems programming. 



BDS C features include: 

Ultra-fas! compilation, linkage and 
execution that produce directly 
executable 808OZ80 CPIM command 
'iles 

A comprehensive debugger thai 
traces program execution and 
interactively displays both local and 
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tion of the system turns out to be just as 
important as what the system actually 
does. 

The insights of many physician's could 
contribute to a system called a "physician 
expert system" or an "automated text- 
book." Winograd says people want to 
believe in the myth of computer infal- 
libility, to believe computers are 
becoming more intelligent than their cre- 
ators and that their speed and access to 
memory banks can replace human deci- 
sion making in complex situations. Thus, 
people will have a tendency to look to the 
machine to replace the physician, invest- 
ing the machine with the confidence and 
trust essential to the relationship we enjoy 
with human physicians. 

"If you ask, "Would you like this auto- 
mated textbook, or would you rather have 
this doctor-expert machine?' the intel- 
ligent machine is so much more glorious 
sounding and has so much more sales 
appeal that it is the thing people want. But 
what you get can only be the opinions of 
various doctors, not the knowledge of 
medicine," Winograd says. "I think 
expectations will bedashed. When people 
say. 'OK, I want a doctor," they will try the 
machine and find out that it isn't a doctor 
but that it does give them useful informa- 
tion. Then other companies will come in 
behind and say, "Look, here's a machine 
which is organized much better to give 
you what you really need." " 

Winograd's current research builds on 
this more realistic appraisal of AI and on 
his interest in natural language syntax and 
semantics. He is acutely aware of the 
technical complexities ol" natural language 
processing and the subtle interpretations 
people make which must somehow be 
translated if we are to interact with com- 
puters using ordinary language. "The 
main problem I am interested in is how 
you can make a formal analysis of linguis- 
tic structure, both in terms of meaning 
and grammar, which will give you the 
necessary framework for computer lan- 
guages." he says. 

This approach led to work that con- 
tinues the line of computer language evo- 
lution that Winograd traces from machine 
language to assembly language, to lan- 
guages like FORTRAN, and on to fourth 
generation languages such as MAPPER. 
"What I'm doing I don't like to call pro- 
gramming languages." he says. "I 
haven't got a name I'm totally happy with, 
but at the moment I'm calling them system 
development languages." 

He researches these new languages on a 
Xerox LISP machine. "LISP is obviously 
not a host for widespread applications on 
today's machines, but I start at the highest 
level of interactive facilities with it," he 
explains. 
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He begins by looking at the "layers of 
thinking" in the process of going from a 
task he wants a computer to handle to a 
piece of code running on the computer 
system. "Starling from the outside, you 
first decide which aspects of the situation 
are going to be formalized and how. You 
need an abstraction to be the basis of the 
program before any details of the code or 
data structures, or anything else. You map 
the fuzzy, open-ended view of the world 
onto a set of terms, measurements, and 
values which then can be represented on a 
computer," he says. 

He wants to bridge the gap between the 
person who specifics which functions and 
tasks the computer needs to perform and 
the translation of those requirements into 
code. 

"I'm interested in what a language or 
set of languages would look like aimed 
toward that outside end instead of in 
toward machine execution," he says. 
"They would allow you to state things at. a 
level of abstraction one step further from 
machine execution into the conceptual 
domain of what you're trying to do." 

If the languages are successful, Win- 
ograd says one result might be the devel- 
opment of automated programming. Once 
the application is specified on the more 
abstract level of his new languages, the 
translation into code could proceed auto- 
matically or in a heavily machine-aided 
way. 

Short of completely automated pro- 
gramming, practical tools for checking 
programs will result. "One of the most 
useful features of structured program- 
ming is that it prevents you from making 
certain kinds of mundane errors— the kind 
caught by a syntax checker, for example. 
At the level of my new languages, you 
could check for certain kinds of concep- 
tual errors which wouldn't get caught by a 
compiler," explains Winograd. 

An enhanced ability to reuse code mod- 
ules is another important goal . Detail is 
rendered idiosyncratic by the language 
used to code the program, requiring a dif- 
ficult line-by-line translation to move 
from one system to another. "By going up 
to higher levels of abstraction you get 
more 'shareability.'" Winograd says. "I 
think you can build libraries of these 
things." 

Winograd is quick to point out that this 
is not a new idea. "It's the same idea that 
you had in FORTRAN, which is if you 
start at the bottom and ask 'What does the 
machine do?" you can gradually work 
your way up to things which are closer to 
what the problem is and away from the 
details of load register, store register, 
multiply, and so on," he explains. 

Automating the programming process 



will shift the programmer's role. "I 
believe there will always be crucial deci- 
sions for programmers to make. End 
users will always need somebody to go in 
and say, 'No, don't implement that feature 
that way, do it this way.' or 'We should 
represent that feature with this sort of data 
structure because another structure won't 
be as efficient.' and the systems program- 
mer will move to the conceptual level of 
saying, 'OK, we need files, we need 
directories, we need to deal with nodes, 
with networks.' Programmers are already 
doing that kind of thinking in an informal 
way." Winograd says, "because if they 
didn't, they wouldn't know where to start 
with their code. What I'm trying to do 
will make the process more systematic 
and give them more help." 



Winograd predicts that systems util- 
ities, compilers, and most of the other 
programming tools currently in use will 
be integrated into this new generation of 
system development languages. 
Depending on the requirements of a par- 
ticular situation, the fundamental algo- 
rithm that structures the program may or 
may not need to be thought of by the pro- 
grammer. "There are certain aspects 
where, given a declarative, nonprocedural 
statement of relationships, the machine 
could select the algorithm by itself: but 
that's limited to certain aspects of pro- 
gramming, and within those aspects I 
would like to see that happen. In other 
places what you would need to specify is 
precisely the algorithm, only at a higher 
level of abstraction." he observes. 
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inograd's 
research inter- 
est and his 
exploration of the larger philosophical 
and metaphysical implications of artificial 
intelligence are deeply intertwined with a 
finely developed sense of the social struc- 
tures within which computers exist. 

Winograd docs not apply for or accept 
any Pentagon funding for his research. 
His view is that the military way of doing 
business and looking at the world has a 
negative impact on researchers and on 
society as a whole. "In addition to the 
world danger created by the weapons spi- 
ral, there is also a strong danger in the 
increasing role for the military in the U.S. 
in general. As an employer, a purchaser, a 
lobbying group, a trainer of people, and 
many other things, they have a negative 
influence on attitudes and practices." he 
said in a statement circulated among com- 
puter professionals in a newsletter put out 
by Computer Professionals for Social 
Responsibility, the Palo Alto, 
Calif. -based organization where he serves 
as a board member. "My "icw is based on 
wanting to decrease the overall mil- 
itarization of the country." 

Winograd's concern is that U.S. Dept. 
of Defense funding shifts the direction of 
research away from constructive uses and 
toward the development of nonproductive 
resources. He sees military research as a 
subtle legitimization of the direction the 
military is taking that goes far beyond the 
particular project being worked on. "A 
scientist working on parallel processing 
algorithms using Lawrence Berkeley Lab- 
oratory |a center for advanced nuclear 
weapons research based in Berkeley, 
Calif. ] computers might be less inclined 
to protest what goes on there because of 
the dependency fostered by the 
relationship with DOD funding," he 
explains. 

Involving respected university 
researchers in Pentagon programs enlists 
public support for controversial programs 
that otherwise might have no chance of 
success. "If the supporters of such a pro- 
gram can point to a famous scientist at a 
highly esteemed university working on 
research, it adds legitimacy and authority 
to the program. It also enlists support by 
developing a feeling of everyone being a 
part of the same team, working together in 
the direction of a shared goal," says 
Winograd. 

He is also concerned with Pentagon 
restrictions on the free flow of informa- 
tion, attendance of professional confer- 
ences, and the classification of research 
findings. He worries about the next gener- 
ation of students being socialized by 
working in programs related to military 
research. A student who spends four years 



studying high-speed electronic circuitry 
in weapon systems research may find it 
more difficult to find a job in nondefense- 
related areas and will consequently be 
channeled into working for military con- 
tractors after leaving the university. "The 
balance of research and teaching, of sci- 
ence and humanities, of graduate and 
undergraduate education arc all shifted to 
suit the needs and tastes of the generals," 
Winograd says. 

Colleagues such as AI pioneer John 
McCarthy challenge this view, believing 
that the Soviet Union is a dangerous and 
unpredictable adversary and that AI 
researchers have a patriotic duty to work 
with the Pentagon to counter Soviet 
research efforts. Winograd argues that 
patriotism is not the act of building more 
sophisticated weapons, because more 
weapons will not make the world safer. 

"If you proceed in building more and 
better weapon systems, will you produce a 
situation where we are alive and have pre- 
served our democratic values?" asks Win- 
ograd. "My answer is no. that this men- 
tality is going to lead us into situations 
which have a greater probability of ending 
up with everybody dead, both us and the 
Soviets," he says. 

Winograd advocates an evolutionary 
process of raising public awareness to the 
dangers of military funding and applica- 
tions of computer research. "If somebody 
asked. 'Would you advocate next week 
getting rid of the Defense Dept.?* it 
wouldn't rriake sense. But if you ask, 'Do 
you think the ideal world, one that you 
might want to work toward, is one in 
which everybody agrees to abolish the 
Defense Dept.?' I'd say, 'Sure,'" he 
explains. 

Winograd acknowledges the privileged 
position thai allows him (he luxury of 
refusing DOD money. "I'm at Stanford, 
in Silicon Valley, with a lot of con- 
nections: as long as there is a certain 
amount of money that is not military I 
have as good a chance as anybody to get 
thai money. For somebody not situated as 
centrally, it's more of a problem. If you 
are the person doing research in some 
small place, you're not likely to get other 
funding, not likely to have many con- 
tacts," he says. 

Each person has to decide how to han- 
dle military funding. "I don't think these 
kinds of moral issues have one right 
answer. The research can be removed far 
from any actual killing. If you're asked to 
pull the trigger, that's one thing. But if 
you're asked lo design a computer pro- 
gramming language which could be used 
to write programs that could run in 
machines that kill, you know your lan- 
guage could just as easily be used to pro- 
gram hospital applications " Winograd 
says. "Every case is a hard case." 

In evaluating the future of AI. Win- 



ograd notes that so far computer applica- 
tions have largely replicated tasks already 
done manually, as in the replacement of 
the typewriter with word processing or of 
calculators with spreadsheet software. 
This is to be expected following the intro- 
duction of new technology, he believes. 
He observes that the appearance of the 
telephone did not magically produce 
today's work places and activities. "But 
revolutionary new possibilities like multi- 
national companies and other ways of 
doing business that wouldn't be practical 
without the telephone eventually changed 
the nature of business." he says. 

He expects a social transformation 
made possible by computers to start in the 
business sectors of our society. "The only 
things which are really going to succeed 
are those which affect what people do. 
Typically, that means what people do at- 
work," he says. Using the computer to 
make tasks easier and more efficient' is a 
natural response, fitting the machine into 
the existing network of practices and ways 
of working. 

Farther in the future arc truly revolu- 
tionary ways of doing things made possi- 
ble by capabilities inherent in the com- 
puter. "I think the biggest potential for 
computer application is in communica- 
tions." Winograd says. "Rather than 
thinking of the machine as doing a calcu- 
lation or a computation. I think of it as one 
part of a network connecting satellites and 
telephones and data bases and so on. a net- 
work filtering things that one person 
wants to put on and another person wants 
to take off the system." 

The simplest example is electronic 
mail, but as machines become more soph- 
isticated, incorporating visual and other 
kinds of information, he foresees substan- 
tial changes. As a consultant for Action 
Technologies, a small San Francisco, 
Calif.-based software company, he is tar- 
geting just this kind of fundamental 
advance. "One of the things I'm working 
on is a program that tries to use the com- 
puter in interesting ways to restructure 
interpersonal communications," he says, 

Reflecting broad concerns about the 
application of AI research. Winograd says 
technology must complement human 
activity, not replace it. "I'm skeptical of 
any attempt to solve complex social, polit- 
ical, human problems by coming up with 
the right technology," he says. "I'm 
hoping people will become aware that 
what computers are doing now is just one 
useful part of intelligence. We need to 
understand where, in the collection of the 
various things we are and all the things we 
do, computers can be best applied." H 
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Speaking 




long with the 
growing inter- 
est in artificial 
intelligence 
comes an increased curiosity about the 
flagship language of the AI community— 
LISP. In this article we hope to satisfy that 
curiosity with a characterization of what it 
means for a language to be LISP-like. 

The major concern people raise about 
LISP is its unique syntax— the parenthe- 
ses that decorate LISP expressions make 
for hard reading. Traditional languages, 
like FORTRAN or Pascal or even C, are 
much less confusing to the human 
reader— or so the claim goes. 

We will show that LISP's syntax is only 
a minor point in the class of issues that 
distinguishes LISP from the traditional 
languages. The deep issues that separate 
LISP are semantic notions and an outlook 
on the computational notations we call 
computer languages. 

To illuminate the LISP perspective, we 
will make repeated use of the following 
problem: given a finite sequence of num- 
bers, compute their sum. 

A sequence is just that: a collection of 
objects, ordered by the integers. We 
would write a sequence as (el , ... ,e n) 
where each ei is to be a number. Then, for 
example, the sequence (1, 2, 3) would 
have a sum of 6, and the sequence (3.1, 
12, 8.3, 3, 22) would have a sum of 48.4. 

In a few moments, we should be able to 
convince ourselves that we can compute 
the sum of any sequence of numbers. And 
so the next task would be to transform this 




By John R.Allen 

innocuous problem into a specific pro- 
gramming language. 

First, the notion of sequence is usually 
transformed into the concrete form of a 
vector. Next we could transform our 
informal notion of summation into a pre- 
cise piece of code. For example, it could 
be written in FORTRAN as: 



X = 

DO 400 I = 1, 
X = A(I) +X 
400 CONTINUE 



LEN 



where LEN represents the length of the 
vector. Or in Pascal we could write: 

x:= 0; 

for i := 1 to len do 

x : = a [i] + x 

Now, a LISP version need not be much 
different: 



(setq x 0) 
(for (i 1 len) 



(setq x (+ (vref a i) x}) 



We can see that the assignment X = or 
x : = is represented in LISP as: 

(setq x 0) 

This example illustrates other points 
about LISP. 

■ The general form of an expression is a 
list of elements, which is designated by 
surrounding those elements with 
parentheses. 

■ The first element in a LISP expression 
usually designates an operation. The 
exception occurs in the control constructs 
Wktfor. 



Looking at the LISP code, we see that 
for, setq, + , and vre/reprcsent LISP 
operations. (LISP examples in this article 
are from The LISP Co.'s TLC-LISP.) 

Parentheses in LISP arc used to indi- 
cate the boundaries of an operation, much 
like the do-continue, do-; or )-) construc- 
tions of FORTRAN, Pascal, or C, 
respectively. So at least syntactically, 
there's not much difference between LISP, 
Pascal, and FORTRAN in this example. 

Now we would like to describe a func- 
tion of one argument (which is a 
sequence), whose body will compute the 
sum of the elements and whose final value 
is that sum. Thus, in a mathematical 
notation we might write: 

sum ((1,2, 3)) =6 

sum ((3.1, 12, 8.3, 3, 22)) =48.4 

It would seem that the definition of sum 
would be a simple wrapper around any of 
our program fragments. That wrapper 
would say: 

■ Make the following code synonymous 
with the name sum. 

■ Here's a name (formal-parameter) to 
use as a synonym for the specific vector 
(actual parameter) you wish to sum. 

Unfortunately there's a rub between the 
wrapper and the program segments: how 
do you determine the length of the vector? 
Of course there are programming tricks— 
where there's a will, there's a kludge: 

■ Place some end-of-elements indicator 
after the last "real" element in any vector 
and then compute the running sum until 
that indicator is encountered, as in: 
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100 LET X = 

200 LET I = 1 

300 IFA(I) = 99999 GOTO 700 

400LETX = A(l) + X 
500 LET I = 1 + 1 
600 GOTO 300 
700... 

■ Or always make the first element in the 
vector be an indication of the length of the 
vector: 

type vector = array [1 . . . 34] of real; 
function sumvec (a: vector): real 

varx, len: real; iiinteger; 

len := a[l]; 

x:=0; 

fori := 2 to len do 

x := a[i] + x; 

sumvec := x 
end 

■ And of course there's the total 
capitulation— always pass an explicit 
parameter that represents the length of the 
vector. Thus , in FORTRAN : 

FUNCTION SUMVEC (A, LEN) 
DIMENSION A(LEN) 
X = 

DO 100 I = 1, LEN 
X = A(I) +X 
100 CONTINUE 
SUMVEC = X 
RETURN 
END 

First-class objects 

One might argue "That's not so bad. 
Whenever we're asked to sum up some 
numbers, we have to know how many 
we've got. We need some way to tell when 
we've seen the last one." But that misses 
the point: we want to think of the 
sequence as a single object. We want to 
settle the issue of "how many" when the 
sequence object is created, and we want to 
create different sized sequences dynami- 
cally (while our computational con- 
versation is proceeding) . After the object 
is created, we want to manipulate the 
sequence as an entity. What happens to 




28 



this simple sequence-idea when it gets tied 
up in a programming language? 

Mathematics treats sequences as 
abstract entities, just like it treats numbers 
as abstractions. There is no notion of a 
largest integer in the language of mathe- 
matics. In contrast, computer languages 
tend to constrain their numbers by the 
(capricious) size of a machine word. 

Similarly, computer languages tend to 
impose implementation-dependent 
restrictions on sequences when they are 
transformed into vectors. These 
restrictions are the software restrictions 
rather than hardware constraints. Certain 
care is required in the design and imple- 
mentation of computer languages to make 
vectors (and numbers) behave like their 
mathematical brethren. 

In earlier days, we could afford to 
ignore such elegance of notation because 
elegance meant time and space, and 
machines were of limited memory and 
expensive. But the balance has shifted: 
machines are speedy and cheap; program- 
mers' aspirations have grown along with 
their salaries. We need languages that 
make it easy to express the complex, and 
that means elegance. 

The most oft-quoted declaration of 
elegance in computer languages comes 
from Robin Poplestone, a British com- 
puter scientist, who expressed the idea of 
"first-class items." A language that deals 
with items— what we'd call objects— in a 
first-class fashion is well on the road to 
elegance. 

The four main tenets of first-classness 
are: 

1 . Any object may be passed as a 
parameter to a function 

2. Any object may be returned as a 
value from a function 

3. Any object may be assigned as a 
value to an identifier 

4. Any two objects may be tested for 
equality. 

Most traditional languages do an abys- 
mal job with objects as vanilla as vectors, 
frequently prohibiting vectors as parame- 
ters and almost always disallowing vec- 
tors as return values. The major exception 
is APL. In that language, arrays are 
treated with respect. So too in LISP, 
where we strive for the ideal of first-class 
objects in a more general setting. 

If we want vectors to be first-class 
objects, then functions that receive vector 



objects as arguments must be able to 
determine the size of the vector. 

So given a vector object we assume we 
have a function named length that will 
compute its size. Then we could even 
write in pseudo FORTRAN: 

FUNCTION SUM (A) 
LEN = LENGTH (A) 
X = 

DO 400 I = 1, LEN 
X = A(l) + X 
400 CONTINUE 
RETURN (X) 
END 

or inpsuedoC: 

sum (a) 
inta[]; 
( int i; 

intx = 0; 

for 0=0; length (s); + -Hi) 

x = a [i] + x; 
return (x); ) 

or in LISP: 

(de sum (v &aux (x 0)) 
(for {i 1 (length vj) 

(setq x (add x (vref v i)))) 
x)) 

Even without a formal discussion of 
syntax, it's reasonably easy to understand 
each dialect of the summation program. 
The important point here is the appear- 
ance of the return in C and FORTRAN 
and its absence in the LISP code. The 
issue is elegance again: this time the issue 
involves the treatment of program mod- 
ules rather than data objects. 

Functional languages 

By way of background, most languages 
(Pascal, FORTRAN. BASIC. C. and tra- 
ditional Logo, for example) are built on a 
von Neumann model of computation. By 
this wc mean that the computational 
engine is thought of as a collection of 
cells, each able to contain one piece of 
information. The actions of the machine 
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consist of selecting the contents of some 
cells, performing an operation on those 
contents, and replacing the contents of a 
cell with the results. 

The inherent characteristic is called a 
side-effect, meaning that the intent of 
computation is to change the contents of a 
cell. In a higher level language (like C, 
FORTRAN, and Pascal), we find this 
model of computation represented by lin- 
guistic constructs called statements. 
These traditional languages also include 
constructs to collect and parameterize 
computations. A collection of statements 
is called a procedure. We therefore call 
such languages procedural languages. 

An alternative to the side-effect model 
is the value model. Here a computation is 
envisioned as producing a value as in '"the 
value of 3+4 is 7." Compare that with: 
"to compute 3 +4, place 3 in a cell, place 
4 in a cell, operate on these two cells with 
the plus operation, and then place the 
result in another cell." In the value model, 
one is more concerned with a description 
of a computation rather than a specific 
prescription of how to perform that com- 
putation. 

Value-based languages have a construct 
comparable to the statement in the pro- 
cedural languages. This construct, called 
an expression, always produces a value. 
This regularity of value-based languages 
extends to the constructs that build new 
computational units. These units are 
called functions and are based on the 
mathematical notion of function. As a 
result, these languages are called func- 
tional languages. Sometimes they are 
referred to as applicative languages, 
because the general way to compute new 
values is to apply functions to arguments. 
Such languages include LISP. Scheme, 
and TLC-Logo. 

The problem here is again semantic as 
well as syntactic. Namely, the require- 
ment that functions be notated to return 
values spoils the elegance of the mathe- 
matical base, making functions second- 
class to procedures. The benefits of a 
functional language over a procedural one 
are more than cosmetic. The flexibility of 
computational models for a functional 
language is comparable to its notational 



flexibility. Specifically, in functional lan- 
guages complex compulations are 
expressed by functional composition as 
in: 

f(g(x,y),h(z)) 

In mathematics, such an expression 
simply denotes a value— there is no sense 
of computation. In a functional program- 
ming language like (pure) LISP we'd 
write: 

(F(GXY)(HZ)) 

and would expect most LISP engines to 
compute (GXY) . then (H Z) , and finally 
pass those two results to F. Thai's purely 
a historical prejudice: if we had several 
LISP engines, the F-engine could request 
two other engines to begin the simulta- 
neous execution of (GX ¥) and (HZ) , 
respectively. We might expect that the 
final computation would be completed 
faster than its sequential cousin: 

(SETQTl(GXY)) 

(SETQT2(HZ)) 

(FT1T2) 

The functional expression of the problem 
is much more elegant and understandable. 
And isn't the point of notation to clarify a 
situation? 

A further benefit to the functional 
approach is its clear and clean model of 
computation. Two kinds of rules — 
substitution and simplification— are all 
that's required to characterize functional 
computation. For example, given: 

(de example (xy) 
(if(gtxy)(+x4) 
l-x3))) 

we could compute (example 12 5) by sub- 
stituting 1 2 for.v and 5 for y throughout 
the definition of example: 

(If fat 12 5) (+ 124) 
(-123) 

We could simplify (gt 12 5) getting T. 
reducing this expression to: 

(if T ( -t- 124} 
(-123) 



Now we could invoke a rule 

(ij T < anything! > < anything2 > ) 

reduces to < anything] > and 

get (+ 12 4) , and finally 
simplify that to 16. 

First-class functions 

The appropriate definition and application 
of such rules are at the heart of com- 
putation, and the accurate implementation 
of these rules is the heart of computer sci- 
ence. For example, we don't usually make 
explicit substitutions in the body of a 
function; rather we simulate such oper- 
ations using a symbol table to contain the 
associations between names and values. 

Though the proper implementation of 
such rules is difficult, the underlying 
model is far more rational than that 
offered by the state-change/side-effect 
world of procedural languages. To a large 
extent, computation is just applied logic; 
the logic of functional languages is sub- 
stantially cleaner than the logic of pro- 
cedural ones. 

Of course, these are arguments for and 
against a purely functional and a purely 
procedural language. Real languages are 
never so pure; what we're after in our 
characterization is intention. The intent of 
a LISP-like language is functional. The 
intent of a traditional language is 
procedural. 

So we've captured two characteristics 
of a LISP-like language: a treatment of 
data objects in a first-class fashion and a 
computational notation based on function. 
Such a language is still pretty traditional: 
objects are first-class but are just sanitized 
versions of the data we've seen in other 
languages, and the programming lan- 
guage is functional but is just a simplified 
version of the functional portions of a 
half-dozen extant languages. 

But what happens if functions are 
allowed to become objects of the language 
and (of course) granted first-class status? 
This question has two portions: what 
practical benefit (notationally or com- 
putationally ) does such a mixing of pro- 
gram and data give us, and assuming that 
those benefits are substantial . what hap- 
pens to our model of implementation? 
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Let's go back to our vector example. 
Let's assume that we want to build an 
APL-like language inside our LISP-like 
language. We'll need operations on vec- 
tors to create new vectors. Let's start easy. 
Assume we wish to construct a new vector 
each of whose elements is twice the origi- 
nal element. So if we call that function 
double, then: 

(double [1 2 3]) = = > [2 4 6] 

or 

(double [3.1 128.3322]) 
= = > [6.2 24 16.6 6 44] 

and of course functional composition is 
available to us: 

{sum (double [1 2 3])) = = > 12 

The elegance of the result is apparent. 
Its execution had better be equally 
elegant in that double must put its result 
somewhere and it cannot destroy the input 
argument. What about the LISP code to 
produce double? Behold Listing 1! 

Three semantic points appear here: 

1 . The local creation of a vector object 
using newvector 

2. The naming of that object as vl 

3 . The return of vl as the value of 
double . 

The latter two points come from our 
insistence on first-class objects. The first 
point, the dynamic creation of new 
objects, is a key ingredient to making 
first-class objects a success and is indeed 
LISP-ish. This ability to create new 
objects out of the ether was championed 
by LISP's cons operation. Its imple- 
mentation raises the specter of dynamic- 



storage management and garbage col- 
lection and raises the hackles of those who 
still believe that computers are supposed 
to get answers rather than help formulate 
solutions. 

So even before we get to the question of 
first-class functions, an insistence on 
first-class data pays handsome benefits. 
Let's continue. 

Assume that, instead of simply dou- 
bling the elements of our vector, we'd like 
to perform some as yet undetermined 
operation on each element of the vector 
(Listing 2). 

The general structure of the new func- 
tion is identical to double . One difference 
appears in the calling sequence: op is a 
parameter that represents a function 
rather than data. 

The other difference between map-op 
and double is: op is applied to the vector 
reference, where + appeared. 

This is another of the first-class 
tenets— naming a function. But what is 
the difference between a functional object 
and its name? For example, we might use 
map-op to define double by : 

(de double (v) (map-op twice v)) 

where 

(de twice (x) (+ xx)) 

In this case, we have named a function 
twice, but the real meat of the function is: 
given a number, double it. We could 
define the same function by: 

(de time-of-day (x) ( + xx)) 

At least in this case, then, the name of 
the function is irrelevant; we just need its 
effect. We can do this in LISP by writing: 

(lambda (x) (+ xx)) 



(de double (v &aux (len (length v)) 

(vl (newvector len 0))) 
(for (i 1 1) (store vl i (+ (vref v i) 

(vref v i))) ) 
vl)) 






(lambda (yl23) (+ yl 23 yl 23)) 

which says we also don't care what we 
name the number either. Regardless, we 
can use the lambda construct to name a 
twice function and use it internally to 
double: 

(de double (v &aux (twice (lambda (x) 

(+xx))) 
(map-op twice v)) 

We can de even better since we don't 
need the twice name: 

(de double (v) (map-op (lambda (x)( + 
xx))v)) 

So the lambda expression {lambda . . .} 
plays the role of a functional constant 
just like 2 is a numeric constant. We are 
used to writing: 

2 + 2 + 3 

rather than the more stilted: 

for (x : = 2 y : = 3) compute x + x + y 

Lambda expressions give us a similar 
visual advantage with functional objects. 
And to complete the analogy with assign- 
ments, it is appropriate to think of the 
structure: 

(de<name> <parameters> 
<body>) 

as an abbreviation for: 

(setq <name> (lambda 

<parameters> <body>)) 

So it appears that we can separate a 
function from its name, and the question 
becomes: what is a functional object? This 
brings the question of scoping into play. 

The term scope refers to the 
relationship between names (like map-op, 
x, and twice) and their values (a globally 
defined function, a formal parameter, and 
a locally defined function, respectively). 
The question of scope occurs because of 
our decision to simulate the substitution 
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model by symbol tables rather than make 
the explicit substitutions. 

The appropriate model to understand 
scope is to think of a symbol table as a dic- 
tionary. When someone writes a phrase, 
they have specific meanings in mind— say 
they use Webster's dictionary. A reader of 
that passage who used Funk & Wagnalls ' 
might get a quite different meaning for the 
passage. The issue of scoping is the main- 
tenance of dictionaries so that the reader 
is assured access to the writer's dictio- 
nary. As we will show, maintenance of 
such dictionary associations requires 
care. 

To begin, assume we simply wish to 
make a new vector, each of whose ele- 
ments is 1 greater than the elements of the 
argument vector. We could do this by: 

(map-op (lambda (x) {add 1 x)) 

[1 2 3]) 
= = >[234] 

But suppose now that we wished to 
exploit a general add-by-n operation on 
vectors: 

(de add-by-n (n v) (map-op 
(lambda (x) (add n x)) v)) 

then we'd be able to increment each ele- 
ment of a vector by 3 with: 

(add-by-n 3 [1 2 3]} = = > [456] 

For example, our substitution model will 
begin with: 

(map-op (lambda (x) (add 3 x) [1 2 3]) 

and the rest is easy. 

However, a slight syntactic change 
destroys these pretty results in a tradi- 
tional LISP. If we change add-by-n to: 

(de add-by-n (i v) 

(map-op (lambda.(add i x}) v)), 

replacing every occurrence of n by / , 
then: 



The substitution model doesn't break 
down, its simulation in traditional LISP is 
at fault. To see this, consider the 
expression: 

(op (vref v i)) inside map-op. 

When we try to evaluate (add-by-n 3 11 

2 3}) in LISP we'll find op to be associated 
with (lambda (xj {add i x)) . We'll want the 
i in (vrefv i) to be interpreted in the dictio- 
nary of map-op. but the i in (lambda 
(x)(addix)) to be interpreted in the dictio- 
nary of add-by-n . Traditional LISP will 
use the dictionary of the reader (map-op) 
for both occurrences of i and will get the 
wrong answer. 

The dictionary that is present when a 
function is defined (or written) contains 
the lexical or static binding of a symbol. 
The dictionary employed by the reader of 
a phrase contains the dynamic or latest 
binding. The distinction can be ignored 
without peril until a language begins to 
tinker with a functional object. Then it 
makes a difference, 

In situations like the preceding one, 
dynamic binding is patently a bug. In 
other situations— particularly in inter- 
active settings— the case is not that clear 
cut. For example, if we have a program 
that contains expressions involving 
output: 

.... (print x) .... 

wc might decide that we'd rather direct the 
output into a vector in memory. If the 



name print is dynamically bound, then we 
could accomplish this by: 

((lambda (print) . . . (print x} . . . ) 

< unary function to stuff vector> ) 

whereas if print were lexically scoped 
then the name would have already been 
bound to the system-level printer. 

The issue of scoping is a reasonably 
deep one: its pitfalls and initial resolution 
in a fully functional setting were first dis- 
covered in LISP implementations. The 
general solution is notationally 
straightforward— substitution of actual 
values for formal parameters. 

However, such an implementation is 
expensive and would ignore some power- 
ful computational models of state- 
oriented computation. As a result, most 
LISPs that address the problem use a 
device called a closure to capture variable 
bindings (like the illusive 3 associated 
with ["). A closure object consists of a 
piece of function text (the lambda 
construct) coupled with a symbol table 
(also called an environment or dictio- 
nary), and the table contains information 
about bindings that should be installed 
when a closure is applied. Thus in TLC- 
LISP wc write the code in Listing 3, and 
the right thing will happen. 

Interesting. We've gone through some 
of the deepest areas that make LISP LISP, 
and we've not even talked about list pro- 



(de map-op (op v Saux (len (length v)) 

(vl (newvector len 0))) 
(for (i 1 1) (store vl i (op (vref v i)) 
vl)) 

Listing 2. 



(add-by-n 3 [1 2 3]) 



[2 4 6]!! 



(de add-by-n (i v) 
(raap-op (closure (lambda (x) (add i x)) (env ' i i)) 
v)) 



Listing 3. 
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cessing. That was intentional: the issues 
of functional languages and first-class 
objects transcend any concern for spe- 
cific data objects— even LISP-like lists. 

Lists and vectors are both imple- 
mentations of the notion of a finite 
sequence. Traditionally, vectors have 
been used to represent objects whose gen- 
eral structure is fixed so that the 
successor/predecessor relationships 
become +1/—1. Lists arc more appropri- 
ate in applications that involve highly 
variable structures; topological 
relationships may change, grow, and 
shrink in unpredictable fashions. In par- 
ticular, vectors usually come into exis- 
tence as a unit, while a list will be built up 
in an element-by-e!ement fashion. 

The issue of notation for abstract 
objects in programming languages is not 
just a theoretical diversion. As we've just 
seen, our ability to determine character- 
istics of objects dynamically in LISP gives 
freedom to our modes of expression. 

LISP as a starting point 

Rather than dwell on the different types of 
data in a modern LISP, or trot out a suite 
of LISP applications in expert systems, 
we'd rather indicate a few directions that 
can be explored from our new vantage 
point. 

■ Toward simplicity of notation 

■ Toward generality of expression 

■ Toward deep applications. 

Toward simplicity: Logo. Though the 
dominant characteristic of Logo is its tur- 
tle graphics. Logo's syntactic character- 
istics are a direct result of simplifying 
LISP's syntax. 

In the late 1960s a group at Bolt. Ber- 
anek. and Neuman in Cambridge, Mass., 
recognized that the power and flexibility 
of programming style enjoyed by the 
LISP community was transferrable to 
domains other than artificial intelligence. 



Language type 



Module 
Component 
Naming 
Result 



In particular, LISP was highly interactive 
and encouraged an exploratory and 
experimental style of program develop- 
ment. 

Their challenge was to disentangle 
LISP's power from the specifics of its 
syntax. Since LISP expressions are writ- 
ten in prefix form, one could dispense 
with the parentheses if the parity of each 
function were known. Thus if F were a 
function of three arguments, then (F 1 23) 
could be represented as F 1 2 3. 

Even functional composition could be 
accommodated. So if C were a binary 
function, then (F (G2 3)4 5) could be rep- 
resented as F G2 3 45. 

But what about (F 1 2 X)TWe couldn't 
write it as F 1 2 X because that would rep- 
resent (F 1 2 (X)). So an additional artifact 
called dots (:) was invented to prefix 
occurrences of symbols that were to rep- 
resent variables. (F 1 2X) would be repre- 
sented as F 1 2 :X. 

With a few other syntactic embellish- 
ments, the Logo group tamed LISP's syn- 
tax. Unfortunately, they also took liberties 
with LISP's semantics, making the default 
module a procedure and requiring addi- 
tional syntax to make a function— a pro- 
cedure that returns a value. This semantic 
change makes it difficult to justify the 
often heard comment that "Logo is a 
LISP-like language." Regardless, to the 
novice at least, traditional Logo looks like 
a baby LISP without parentheses; data arc 
numbers, symbols, and lists, but it has no 
vectors or functional objects. 

But it is now 15 years later. People's 
expectations and experience with lan- 
guages have increased. As a result we 
believe it is important to return to the 
LISP roots when designing Logo-like lan- 
guages. 

Toward expressivity: logic 
programming. We can move another 
direction from the LISP base, gener- 



alizing from the functional programming 
base to the relational programming lan- 
guages. 

The theoretical work that supports the 
functional programming languages is a 
product of research into the foundations 
of mathematics. Specifically, a mathe- 
matical formalism called lambda calculus 
was invented by Alonzo Church in the 
1930-1940 time frame. That language 
gave axioms and rules of inference that 
characterized the mathematical notions of 
function. 

In that same time period, formal sys- 
tems were invented to give precision to 
the notion of relation. A mathematical 
relation is a generalization of the notion of 
function. As such, programming lan- 
guages based on relations are potentially 
more general than their functional cous- 
ins. The specific formal system that sup- 
ports these relational or logical languages 
is called first-order predicate calculus. 

We will not go into specifics of logic 
programming here. The point to be made 
is that the commonality of mathematical 
pedigree distinguishes the functional and 
relational languages from their procedural 
cousins. The style of thinking, the atten- 
tion to abstraction, and the importance of 
notation over specifics of implementa- 
tion—these are common features of the 
functional and relational languages. 

With the relational languages, we now 
have the basis for a comparison of the 
components in the currently available pro- 
gramming notations (Table 1). 

To some extent the functional languages 
represent a compromise: they are not as 
general as the relational languages and not 
as machine-oriented as the traditional 
ones. With guidance, novices can map 
their experience in mathematics into a 
functional setting: they can impose a spe- 
cific process regime on their model of 
function evaluation and functional com- 
position. From a practical perspective, 
there has been a decade more experience 
with functional languages than with their 
relational compatriots. This experience 



Procedural 

procedure 
statement 
assignment 
side-effect 



Functional 

function 
expression 
lambda binding 
value 



Relational 

clause 
relation 
unification 
constraint 
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involves both the design of large systems 
as well as the design of the languages 
themselves. 

Toward deep applications: 
introspection. No paper on LISP would 
be complete without a discussion of 
LISP's ability to convert data into pro- 
grams and programs into data. 

First, notice this notion is distinct from 
allowing functional objects— even first- 
class functional objects. Nothing we have 
done prior allows us to do any more than 
create functional constants, pass them as 
parameters, give them names, or return 
functions as values. We're asking for 
something more here: the ability to dis- 
sect, modify, and rebuild components of 
functions and expressions and then exe- 
cute the resulting structure. 

The usual reaction to such shenanigans 
is something akin to what Dr. Franken- 
stein must have heard. However, there is 
nothing sacrilegious about programs that 
can modify other programs. In a trivial 
sense, text editors are used this way; in a 
deep sense, machine-level debuggers do 
this too. LISP simply dignifies and 
cleanses the process a bit by moving the 



idea up to the level of a functional 
notation. 

LISP's technique involves representing 
program elements as data objects — lists, 
in particular. As a result, programs look 
like data and can be manipulated by 
LISP's list operations, To complete the 
circle, we need an operation to take a data 
object and evaluate it: that operation is 
named eval . 

There is another piece of the LISP puz- 
zle that is related to, but not identical to, 
the program-as-data issue: control-as- 
data. The program portion of a com- 
putation represents the static 
information— the text and data of the 
process. 

In the course of the computation the 
execution device must maintain some 
internal, dynamic, information— where to 
return to after a computation is com- 
pleted, where to place values, and so on. 
This kind of information is called control. 
If we make such information explicit- 
make control a first-class data object- 
then new insights on computation become 
possible. In particular, if the control 
structures of the engine that is performing 
a computation are made available to that 
engine, that gives us the rudiments of 



computational introspection, which is an 
interesting topic of current research. 

The LISP elephant 

Well where are we? No useless "here's 
CAR and here's CDR." No insulting 
examples of ELIZA or ANIMAL dressed 
up as expert systems. No tedious "here's 
factorial and here's how to reverse a list." 

I hope that our view of LISPis suf- 
ficiently different from what you've seen 
that you may be enticed to take another 
look. If you look at LISP with the follow- 
ing five notions in mind: 

■ First-class objects 

■ Functional semantics 

■ Functions as objects 

■ Programs as data 

■ Control as data 

you'll see that the world of LISP takes on 
a whole new perspective. H 

John Allen is president ofTlie LISP Com- 
pany. He has been involved in LISP andAI 
since 1965 and is author of Anatomy of 
LISP and co-author of Thinking about 
TLC-Logo. 
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Los Gatos, California 95030 
408/354-3668 




fCOHFANY 

LC)> 



Also Available: TLC-Logo $100.. and our book Thinking Abotii TLC'Logo 518 
Zetalisp is a trademark of Symbolics. Inc , WordStar is a registered trademark i>[ MicroPro 
International Corp. . Smalltalk is a trademark of Xerox Corp 
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POLYTRON TOOLS IN THE SOFTWARE DEVELOPMENT PROCESS 



POLV 

WINDOWS 

DEBUGGER! 

PERFORMANCE 

ANALYZER 




CONTROLLABLE BY POLYMAKE 



POLYTRON 

© 



COMPILER 

OR 
ASSEMBLER 



OBJECT 

© 

CODE 




I q 

POLYTRON I 

© : 

PVMFM 



EXECUTABLE 



HUMAN INPUT 




ADVANCED 

PROGRAMMER 

TOOLS 



Thousands of Professional Software 
Developers with demanding 
deadlines turn ro high performance 
M5-DOS/PC-DOS tools from 
POLYTRON to boost their produc- 
tivity. All the tools shown above are 
explained in detail in the 
POLYTRON ProRrammer's 
Catalog. 

Network & Site Licenses Available, 

PolvWindows Desk 

7rV Modular. Expandable Desktop Organizer 
100% memory-resident desktop 
organizer fur professionals. Configurable 
so you can have one or more of the 
following (unctions available instantly: 
Hex/Decimal/Binary Calculator, 
Standard Calculator, ASCI! Table, 
Multiple Document Text Editor, PolyKey 
for creating your own keyboard macros, 
Rolodex-type tiles. Calendar, Alarm 
Clock, Appointment Books, Autodialer, 
Grabber for CLit-and-paste between 
applications, Copy-Protected $49.95, 
Not Copy-Protected S84.95. 

PolvWindows Debugger/ 
Performance Analyzer 

A Pro/essionaf, Memory-Resident Software 
Development Tool 
Instantly analyze and tlchug ANY 
program running on your PC anytime. 
Superior to the IBM Professional 
Debugger and easier to use. Supports 
multiple breakpoints, multiple display 



formats, memory searches, single-step 
execution, disassembly, hex arithmetic, 
and block moves. Tells you where your 
program is spending rime and allows you 
to optimize performance. You can specify 
the memory ranges tor analysis. Results 
are displayed graphically or in tables. 
Includes PolyWindows Desk (Not 
Copy-Protected) all for only $149. 
(Present PolyWindows users can receive 
trade-in discounts.) 

POLYTRON Version Control 
System (PVCS) 

Efficiently maintains revision history of 
source files for software project manage- 
ment. Maintains chronological, histori- 
cal records of changes as "edit scripts" 
(reverse deltas) with full text of the latest 
"checked in" revision. Reconstructs any 
prior "revision" of any module, defines a 
"version" as specified revisions of various 
modules, supports branching from prior 
revisions, optional password protection. 
Friendly, unobtrusive user interface is 
based on a unique "syntax guide" con- 
cept with context-sensitive help. Designed 
for single or multiple programmer 
projects. A powerful tool with main- 
frame power. Single-user license: $395. 

PolyXREF 

The Mufti-Lingual Cross Reference System 

Generates Cross Reference lisrings across 
single or multiple source files of one or 
more languages. Tells you exactly where 
each variable and procedure is defined 
and everywhere ir is referenced. 



POLYTRON TOOL KITS 

Package includes PolyXREF engine 
plus One source language module plus 
.CRF module: $129, additional source 
language modules [C, Pascal, Assem- 
bler or English]: S49 each. Complete 
package including all four language 
modules: S219. 

PolyLibrarian 

The Object Module Library Manager 
The premier library manager allows you 
to ereare, examine and manage libraries. 
Modules can be listed, added, replaced, 
extracted, and deleted. You can search for 
public or external names and even change 
them. Three operating modes can be 
intermixed for maximum flexibility. 
PolyLibrarian I for Microsoft format 
libraries: S99, PolyLibrarian 11 for 
Microsoft and Intel format libraries: S149. 

PolyMake 

The Intelligent Program Builder 
and Maintenance Tool 
Automates the software maintenance 
process. Deremvines which tiles (programs, 
etc.) are our of date and invokes your 
compiler, linker, librarian and does 
whatever is necessary ro bring your 
entire system up to date. Frees you from 
the need To Terncmher which files 
depend on others and which files have 
been modified. Remembers the exact 
sequence of operations necessary to 
create a new revision. Completely auto- 
matic unlike competing products. Once 
you use it, you can't live without it. 
Only $99. 



POLYTRON C Library 1 

Over 65 Higfi Performance Routines For 
Lattice C Compiler Users 
These are routines for serious programmers 
that need Executive and I/O functions. 
Complere source code (mostly Assembler) 
included. Only $99. 

POLYTRON Virtual Memory File 
Manager (PVMFM) 

Provides efficient virtual file access and 
buffering for both text and binary files 
with automatic buffer-to-disk swapping. 
Reduces program access time and handles 
data structures larger than memory 
allows. PVMFM is a library of user- 
callable functions that may he linked 
with your applications code to provide 
virtual file management capability and 
random access file buffering. Compari- 
ble with Assembler and high-level 
languages. Only $199. 



To Order Products Call 

1-800-547-4000 

AskforDept.No. 350 

Foreign & Oregon orders call 

(503)684-3000 

Send Checks, P.O.s To: 

POLYTRON Corporation 

RO, Box 787 DS-350 

Hillsboro, OR 97123 

Add $5.00 Shipping To Total Order 



To Order detailed Programmer's 
Catalog, send requests to address 
above for fast response (or circle reader 
service card number). 
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Part I: The ERGO 
Logic Kit 



With this article, COMPUTER 
LANGUAGE launches a special three-part 
series that will explore the relevance of 
decision tables to interactive computing. 
Tlie author will describe the requirements 
for and the design of an integrated soft- 
ware kit that includes a decision table edi- 
tor, interpreter, compiler, grid chart editor 
and translator, and numerous other little 
and large pieces that will be worth your 
while. 

Since seeing something is better than 
reading about it, COMPUTER 
LANGUAGE will also be distributing suf- 
ficient code to the ERGO Logic Kit so that 
you may experiment with it. (For informa- 
tion on how to acquire your free version of 
the ERGO Logic Kit, see Editor 's Notes, 
page 5. ) You will then be able to gain 
experience in using decision logic tables 
for software design, prototyping and test- 
ing, knowledge formulation and represen- 
tation , and expert systems design and 
execution. 

Ihcrc is little real 
doubt that com- 
puter programs 
will be more 
intelligent in the future. I do not mean our 
programs will be more intelligently con- 
structed (although that is possible) , but 
that, once constructed, they will do tasks 
that require more intelligence. 

Today we are already seeing the first 
commercial realizations of the advanced 
programming techniques and languages 




By Jim McCarthy 

often referred to collectively as artificial 
intelligence. The real issues arc how 
quickly and to what extent (his migration 
of intelligence from humans to machines 
will take place. 

Both the rate at which intelligence finds 
its way into our programs and the degree 
of intelligence thereby proliferated are 
governed by two major elements. 

■ Translating natural intelligence into a 
computer friendly format requires tal- 
ented programmers. 

■ The natural intelligence we wish to 
congeal in our software resides largely in 
the minds and experience of diverse 
experts who, devoting themselves to other 
endeavors, have little computer savvy and 
are probably not even fully conscious of 
the very thought processes that make them 
experts. 

The computer shows no mercy toward 
the imprecise and diffuse intelligence of 
our expert. Our expert, while fully under- 
standing say, chickens or abnormal psy- 
chology, has neither use nor concern for 
the niceties of computer dialectics. To 
engender a symbiosis between computers 
and experts, we must find them a common 
ground, a language they can both 
understand. 

The more experts we have happily bang- 
ing away at computer keyboards- 
exploring, encountering, expressing, 
encoding and archiving their wisdom— 
the more quickly and massively will we 
all have common access to our collective 
experience. 

The real job. then, is not to tup experts 
and laboriously codify their knowledge on 
a cusc-by-cuse basis, with economics the 
sole dictator of precedence, but to provide 



the experts with the tools and the personal 
incentive to do it themselves. 

If our tools cannot attain a technologi- 
cal state wherein experts themselves pro- 
gram expert systems, large numbers of 
such systems will not soon proliferate. 
Just as spreadsheets were made into a sim- 
plified form of decision support, our 
expectations of what artificial intelligence 
means may have to be scaled down to sim- 
plify the programming process and 
thereby greatly extend access to the 
technology. 

And just as we were surprised by the 
inexhaustible creative lode that was 
tapped with the medium of electronic 
spreadsheets, wc may be similarly sur- 
prised if we make available a comparably 
friendly medium in the field of expert sys- 
tems. We won't really know what's 
wanted until the experts get started. 

I mentioned earlier thai the thought 
processes that constitute expertise are 
often obscure even to the person who has 
them. It has been my experience that 
when experts describe their methods, they 
usually leave out myriad hidden assump- 
tions, exceptions to the general rule, and 
essential refinements to the methods 
described. The storage and management 
of a large part of their wisdom has seem- 
ingly been delegated to long-term 
memory and some sort of background 
thought process. 

With the greater experts, virtually the 
entire matter belongs to the still more 
impenetrable realm of the unconscious. 
Intuition and something called judgement 
arc often the primary ingredients of 
expertise. Lacking a straightforward 
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methodology and a simple format for the 
exploration and codification of expertise, 
the expert has only limited access to his or 
her own judgmental powers. 

I believe that the experts' urge to com- 
prehend themselves, express themselves, 
and extend the reach in time and space of 
their expertise will be the predominant 
incentive behind the fabrication of expert 
systems. 

In those cases where the experts are not 
the programmers of the expert systems to 
which they are related, the ability of large 
numbers of programmers and analysts to 
fabricate logically complex software with 
a greater degree of confidence than is now 
the case is a prerequisite. The increasing 
complexity and consequent unreliability 
of software is (or soon will be) a major 
technological issue. The virtual impos- 
sibility of testing software threatens to 
swamp our productive capacity. 

The purpose of this series of articles is 
to show one way we might make progress 
toward accomplishing these various ends 
and to make a concrete contribution in the 
form of a design and some source code 
that may stir up some interest, fuel some 
imaginations, or otherwise be fruitful. 

I will describe a software kit 1 based 
upon decision logic tables. Decision 
tables do for certain kinds of logic what 
spreadsheets do for certain kinds of num- 
bers. An electronic decision table pro- 
vides many of the same qualitative experi- 
ences to the user that electronic 
spreadsheets do: a visceral sense of con- 
trol, even mastery; the feeling of instanta- 
neity, of certain and rapid-fire accuracy; 
the sheer pleasure and multiple communi- 
cative benefits of intense visual feedback; 
and the joy of liberating latent program- 
ming skills. 

Think back to the first time you saw 
Visicalc, to the excitement it may have 
generated for you. Perhaps you even 
experienced a revolution in your way of 
thinking about computers. The idea of 
interactive decision tables is of a com- 
parable magnitude: something that abso- 
lutely fits both people and machines, 
something that can bind the computer in 
a most direct way to your imagination , 
without a lot of folderol in between. Deci- 
sion logic tables, like spreadsheets and 
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word processing, are the type of computer 
application that seems perfectly obvious 
after you've seen it. 

Decision fable structure 

First wc must cover some fundamentals, 
and rather concisely at that. A decision 
table is. a map. representing the relations 
of combinations of conditions to combina- 
tions of actions. A single condition/action 
relation might be something like: 

If it's raining {condition}, 
wear your overcoat (action). 

When multiple conditions and actions 
are present, things get a little more 
complicated: 

If it's raining (condition! ), 

and cold (condition2), 

and it's nat expected to improve 

(condition3), 
then don't go out (acfionl ); 
but if it's raining (condition! ), 
and not cold (condition2), 
or cold (condition2) 
and not raining (condition 1), 
then wear your overcoat (action2); 
but if it's expected to get better 

(condition3) 
wait until it does (action3). 

Let's use decision table techniques to 
analyze this trivial problem. This is 
accomplished by isolating the conditions 
and the actions and mapping them into a 
tabular format divided into four 
quadrants: 



condition 
stub 



condition 
entry 



action 
stub 



action 
entry 



Our three conditions are: 

Raining (y/n)? 

Cold (y/n)? 

Expected to improve (y/n)? 

Our three actions are: 

Don't go out 
Wear coat 
Woif 



therefore: 

Raining? 

Cold? 

Improving? 



Don't go out 
Wear coat 
Wait 



Now we simply fill in the rules in the 
condition and action entry stubs of the 
table, like so: 



Raining? 

Cold? 

Improving? 



Don't go out 
Wear coat 
Wait 



y y n 
y n y 
n y 



A careful comparison of the tabular 
and the textual descriptions of our little 
condition/action matrix will reveal that 
the table is merely the transcription of the 
problem as described. 

Of significant interest here is that you 
likely understood the way the preceding 
table was to be read. Note that I said noth- 
ing of the actual mechanics of communi- 
cation in the structure of a decision table; 
rather, your intuition grasped (probably) 
the meaning due to the orderly, graphical 
layout of the information content of the 
problem. If the only benefit of decision 
tables were their communicative proper- 
ties, that would probably be sufficient 
cause for their use. However, there is 
much more value to the structure, as we 
shall see. 

Matrix, column counts, don't cares 

In the preceding table, we had some blank 
condition entries (for example, second 
column, entry for Improving?). We will 
fill these blanks in with dashes (— ), and 
wc will understand these dashes to mean 
"don't care." Also, let's add a matrix col- 
umn (M) so we can do some useful arith- 
metic. Finally, let's add some labels to 




columns {from now on called rules) and 
rows so that we can refer to them con- 
veniently. Our table now looks like this: 







M 


1 


2 


3 


4 


CI 


Raining? 


2 


y 


y 


n 


— 


C2 


Cold? 


2 


y 


n 


y 


— 


C3 


Improving? 


2 


n 


— 


— 


y 


Al 


Don't go out 




X 








A2 


Wear Coat 






X 


X 




A3 


Wait 










X 



The M column designates the number 
of values a condition can attain. In our 
case, all the conditions are a simple Yes/ 
No, so 2 is our uniform entry in the matrix 
column. 

A decision tabic made up solely of con- 
ditions that have a binary (or y/n) matrix 
is called a limited entry table. Tables hav- 
ing only conditions that have greater than 
a binary matrix are called extended entry 
tables. Finally, tables that have both 
binary and greater than binary condition 
matrices arc called, logically enough, 
mixed entry tables. We will give examples 
of mixed tables later on. 

The virtue of including the M column is 
that now we can determine how many 
rules should be in the table. If we have 
three conditions, each of which can attain 
two values, the total decision matrix 
should be 2*2*2. or 2 A 3, or 8. Consider: 
if condition CI can attain two stales, and 
likewise with C2, we have four possible 
combinations of condition values, like so: 



CI 
C2 



Factoring in C3, also having two potential 
states, we now have eight unique possible 
combinations of conditions: 



CI y y 
C2 y y 
C3 y n 



n 



n n 
y n n 
n y n 



We know, then, by computing the com- 
plete decision matrix, the number of col- 
umns that must be in a table to cover all 
possible contigcncics. Referring back to 
our previous example, we see that 
although wc have a total matrix of eight, 
as we have described, we only have four 
rules. To analyze this situation, we must 
turn our attention to a method of account- 
ing for our "don't care" or dashed 
entries. 



Consider rule 2: 




2 


CI 


y 


C2 


n 


C3 


— 


Al 




A2 


X 


A3 





What wc are really saying when we say 
we "don't care" about C3's value is that 
C3 can hold either of its values, and the 
rule would still hold. In other words, we 
can expand rule 2 into two columns. 





2a 


2b 


CI 


y 


y 


C2 


n 


n 


C3 


y 


n 


Al 






A2 


X 


X 


A3 







Rule 2, therefore, really contains two 
logical columns. It is called a complex 
rule. Rule I . containing no dashes, is a 
simple rule. Applying the same tech- 
niques, rule 3 becomes: 



3a 3b 

n n 

y y 

y n 



CI 
C2 

C3 

Al 
A2 

A3 



And rule 4. having dashes in both C 1 
and C2, expands to four logical columns: 





4a 


4b 


4c 


4d 


CI 


y 


y 


n 


n 


C2 


n 


y 


n 


y 


C3 


y 


y 


y 


y 


Al 










A2 










A3 


X 


X 


X 


X 



Fully expanding the whole table in this 
fashion, it becomes the table presented in 
Table 1 . 

After having eliminated all the dashed 
entries, we can count (he rules and sec 
that in our example we have nine rules, 
whereas our matrix arithmetic tells us we 
should only have eight. Examining the 
fully expanded table, wc note that col- 
umns 4d and 3a have the same condition 
entries. This is also true of columns 2a 
and 4a. 

Because the interpretation of the two 



CI Raining? 

C2 Cold? 

C3 Improving? 


M 1 2a 2b 3a 3b 4a 4b 4c 4d 

2yyynnyynn 
2ynnyynyny 
2nynynyyyy 


Al Don't go out 
A2 Wear coat 
A3 Wait 


X 

x x x x 

X X X X 



Table 1. 



CI Raining? 

C2 Cold? 

C3 Improving? 


M 

2 
2 
2 


1 

y 
y 

n 


2 

y 

n 
n 


3 
n 

y 

n 


4 

y 


5 

n 
n 
n 


Al Don't go out 
A2 Wear coat 
A3 Wait 
A4 Go out 




X 


X 


X 


X 


X 



Table 2. 
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sets of columns in question leads to differ- 
ent actions, this table is said to have con- 
tradictory rules. If 3a and 4d led to the 
same action(s), or 2a and 4a did. the table 
would be said to contain redundancies. 
The problem is that if you were reading 
the table, you could not determine which 
rule applies, given that their condition 
entries are identical. 

Recall that we uncovered this problem 
in our table by: 

■ Computing the total decision matrix 

■ Expanding each rule that had one or 
more dashes 

■ Counting the columns in the expanded 
table 

■ Examining the expanded table for con- 
tradiction or redundancy. 

If a table has as many rules as the 
matrix computation (Ml*M2*M3 . . . 
Mn) says it should, and there is no con- 
tradiction or redundancy, the table is said 
to be mechanically perfect. That is. all 
possible combinations of condition values 
are accounted for, and none can lead to 
contradictory or redundant action sets. 

I should point out that it is possible for 
the total (expanded) column count to pre- 
cisely match the total decision matrix, and 
the table could still contain redundancies 
or contradictions. That's why it is neces- 
sary to expand the dashed columns and 
check each column against every other 
column, making sure there is no overlap. 

Often people include a special column 
in a decision table, the ELSE column. If a 
given set of condition values do not match 
an explicitly stated rule, the ELSE column 
is invoked and whatever actions are speci- 
fied underneath it are executed. A table 
with an ELSE rule is necessarily 
complete. 

However, this simply begs the question. 
To put an ELSE rule in a decision table is 
like turning up the air conditioning so 
you're cold enough to light a fire. If 
you're not cold, you don't need a fire. If 
you want a catch-all rule, you don't really 
want the discipline and the benefits of a 
decision table structure. 

For completeness' sake, let's look at 
our table again, perfected (Tabic 2). By 




comparing the dash-expanded table 
against the fully expanded matrix, we saw 
that we were missing rule 5 (for which 
action A4 was created). A systematic 
check of the example table against the 
fully expanded decision matrix to ascer- 
tain whether the example table contained 
all possible rules revealed that it did not. 

The other bug in our table related to the 
dominance of rule 4, which specified that 
any time the weather was improving, we 
should wait for it to do so, and that no 
other condition mattered. We realized that 
the dashes in rules 2 and 3, C3, which 
could be interpreted as "y," led to con- 
tradiction. Therefore, we simplified these 
two rules, replacing the dashes with "n," 
as this was the only possibility that would 
both maintain the integrity of the table and 
give rules 2 and 3 a reason for being. 

Perhaps all of this is a bit tedious. We 
will, in a bit, rely on our computer to 
relieve us of all the tedium associated with 
decision tables, but the point of this dis- 
cussion is to introduce (for those who 
need it) the basic structure, terms, and use 
of a decision table. The important points 
to keep in mind are: 

■ The decision table is a superior com- 
munications device: the meaning is intu- 
itively grasped. 

■ The attainment of mechanical per- 
fection is possible: all possible combina- 
tions of conditions and actions can be 
accounted for in a systematic way. 

■ Latent redundancy and contradiction 
can be made manifest. 

Applications 

It should be obvious that decision tables 
have a high degree of usefulness in com- 
puter software documentation applica- 
tions. Their communicative properties, in 
cases where there are complex condition/ 
action matrices, arc superior to flow- 
charting, pseudocode, and many of the 
other conventional documentation 
techniques. 

In the case of system analysis, they are 
likewise valuable. The imposition of an 
orderly methodology to what is often a 
disorderly process and the real possibility 
of nonanalyst involvement indecision 
table construction combine to make deci- 
sion tables especially applicable. 



T.J. McCabc^ has shown that the num- 
ber of bugs in a computer program is pro- 
portional to the complexity of that pro- 
gram. He suggests a complexity metric, 
based on graph theory, that quantifies the 
degree of complexity in a unit of soft- 
ware. This metric is related to the number 
of branches in a software module. As a 
module increases in complexity (as the 
number of if /then constructs climbs), bugs 
proliferate. 

This phenomenon, which I suspect we 
have all experienced, is thought to be the 
result of the extreme difficulty most peo- 
ple have in keeping in mind more than six 
or seven things at the same time. McCabe 
has shown that as the number of branches 
in a module approaches 10, the module is 
increasingly unfit for use due to its predis- 
position for "bugginess." 

This means that although it is possible 
for you to create a module with excessive 
branching, you can't really understand it 
because you can't fit it all into your mind 
simultaneously. You are therefore forced 
to forego the macroscopic view of your 
module— the relationships of all the 
pieces to the whole— in favor of a line-at- 
a-time or microscopic perspective. Natu- 
rally, if you can't understand your pro- 
gram, its prospects diminish. 

Electronic decision tables can enable 
the programmer to construct vast net- 
works ofif/ihen constructs with greatly 
increased confidence. This is because 
mechanical perfection is attainable and 
measurable. The computer itself can 
ascertain whether all possible combina- 
tions of conditions are accounted for (the 
macroscopic view), and the program- 
mer's inescapably microscopic view is 
entirely appropriate and all that is 
required. Thus, the computer does what it 
can and the programmer cannot, and vice 
versa. Both intelligences play to their 
strong suits. 

This aspect of decision tables led me to 
construct a decision table compiler, which 
will be a subject addressed in Part II of 
this scries on decision tables. Suffice it 
to say for now that with modest effort it 
can be made to compile into any high- or 
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low-level language or output a graphical 
depiction of the decision network. 

If decision tables could call other deci- 
sion tables, proceed from one to another, 
pass parameters back and forth, query 
operators for condition values, evaluate 
rules, report decision history, and do a 
few other lesser things, they would be the 
obvious medium of choice for most small 
to medium expert systems. If a condition 
stub could really be a cull to a subtable, 
the results of which would be evaluated as 
the condition entry for that stub, there 
would be sufficient size, flexibility, and 
generality to cover systems of say, 500 to 
1 ,000 complex rules. If the construction 
of tables were made simple and fun 
enough, the experts themselves would 
build the systems. 

This notion led me to fabricate a deci- 
sion table interpreter with these and other 
qualities. The interpreter will be 
addressed in the final part of this series. 

Problems 

A reasonable question to pose at this junc- 
ture is: if decision tables are so useful, 
why aren't they more universally applied? 
There are, in my view, two closely 
related reasons for this— one simple, the 
other a bit more complicated. 

The simple one first. Spreadsheets 
were always used by accountant and man- 
agerial types even prior to their con- 
version to electronic media. They were 
just hard to work with. When the use of 
microcomputers eliminated the drudgery 
from and intensified the usefulness (and 
fun) of spreadsheets, millions of people 
who had never done a manual spreadsheet 
were drawn to the medium, My thesis is 
that the same phenomenon is possible, 
though probably on a smaller scale, with 
respect to decision tables. 

That brings us to the second problem. 
What makes them so hard to use? Why 
haven't decision tables become a popular 
medium for the management of the myr- 
iad problems to which they arc ideally 
suited? 

There's nothing new about decision 
tables. Their history dates back to early 
days of computer science .Their many 
useful properties have been thoroughly 




investigated, their applicability to 
computer-related operations has been 
identified, decision table symposia have 
even been held, decision table books have 
been published, and yet decision tables 
remain something of an obscurity, their 
use seemingly confined to a relatively 
small group of devotees. 3 

Anyone who has spent much time in 
working with decision tables realizes that 
while they are a wonderful way to com- 
municate information, both to humans and 
computers, they are a difficult way to 
express it. The mental steps it takes to cre- 
ate, edit, check, and perfect a decision 
table are painful to most minds, alien to 
others, and can be ultimately forbidding 
in all but the most trivial of examples. 

Rather than the simplemindcd example 
above, picture six conditions, each with a 
matrix of five values. That translates to 
over 3,000 distinct possible simple rules. 
And yet many real-life cases have at least 
that much complexity. 

The difficulty of resolving a problem of 
this magnitude into a workable number of 
interrelated conditions and actions, the 
tedium of developing rules for all possible 
combinations of conditions, and the com- 
plexity of checking for completeness, 
redundancy, and contradiction apparently 
overwhelm the perceived value of doing 
so. Therefore, decision tables— which 
really are a most powerful way of 
encoding, communicating, and using 
many types of intelligence— languish. 

This, of course, was the main problem 
that confronted me when I thought of all 
the benefits that would accrue to mc if 
only I would consistently build decision 
tables. The fact is, they are hard to make. 

Table editor 

So I decided to make it easier to work with 
decision tables. The goals were various, 
but of one thing I was sure: the problem 
was in the creation and perfecting of 
tables and not in their application. My 
principal design focus was therefore on 
the creation of an interactive decision 
table editor with a high degree of tedium- 
relief. 

The first tedious task that was to be 
eliminated was the fabrication and keying 
in of condition entries. It is easier to 
respond to or change something that 
already exists than it is to create some- 
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a Cross-Reference and Lister 
utility for Pascal source programs. 

• All options user-selectable. 

• Identifies line number for each 
variable reference. 

• Can cross-reference constants. 

• indicates type of reference. 

• Will process a list of files. 
■ will read include files. 

• Draws boxes for control structures 
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begin — ^—^^ 



[ 



[ 



end 



CallGracon ; 
re peat 

RunTurboRef ; 
until Organized 
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thing from nothing. This element of 
human nature is a guiding principal in the 
integration of user friendliness in com- 
puter software. 4 My vision was that if I 
could enable the computer to perform the 
raw creative task and make it easy for the 
user to tell the computer where it was 
wrong, the creation and perfection of 
decision tables would be an infinitely sim- 
pler (though not absolutely simple) task. 

In the ERGO system's table editor, the 
user need key in only the condition stubs 
and matrix for each condition (if it is 
greater than two) and the table editor will 
generate a mechanically perfect set of 
simple (no dashes) rules. The user then 
need only edit this data and enter the 
appropriate action stubs and entries. 

The table editor will also kill redundant 
or contradictory rules, so that the creation 
of a table is really a process of editing a 
computer-generated rule, usually by 
adding dashes and then letting the table 
editor eliminate the resulting superfluous 
column(s). 

This describes the bare rudiments of the 
ERGO system's table editor operation. 
Many more features and facilities will be 
described later, along with some of the 
associated code. 

Grid chart editor 

Sometimes it is convenient to create log- 
ical structures in a different way, namely, 
with the action as the key element: 

Wait for weather improvement when 
it's forecasted to improve. 

Wear your coat when its raining or 
cold. 

Don't go out when the forecast is bad. 

Go out when its not raining or not cold 
or not improving. 

Notice how much simpler this expres- 
sion is than the lengthy description of our 
earlier example. This is because when you 
express logic keyed by action, you need 
never have more clauses than actions. 
This simple technique can be an appealing 
way of describing condition/action 
relations because of its inherently limited 
boundaries. Where our condition-keyed 
example had multiple clauses and was still 
incomplete and redundant, the action- 
keyed description of the same problem is 
terse and complete. 

The pertinent point here is that a prob- 
lem so expressed can be transcribed 
directly into an entity called a decision 
grid chart, which can itself be converted 
into a mechanically perfeel decision table. 
This can give a user a tremendous leg up 
on the creation of a logically perfect deci- 
sion table. Extending our commitment to 
the principle that it is easier to edit than to 



create, I wrote a grid chart editor that 
works in tandem with the other pieces of 
the kit. 

By simply expressing the condition val- 
ues that imply the actions, paying no 
attention to the combinations of condi- 
tions, a mechanically perfect and logically 
close decision table, with both condition 
and action entries, can be automatically 
produced. From there we can edit, com- 
pile, interpret, or depict. 

An interesting aspect of decision grid 
charts is their close relation to common 
English. Though I haven't done the pro- 
gramming, the translation of English lan- 
guage statements in a prc-grid chart for- 
mat to grid charts seems clearty possible. 

Part II and III 

In Part II of this series, we will be exam- 
ining the mixed entry table editor, for this 
is the most fundamental piece of the deci- 
sion table system— the ERGO Logic Kit- 
to which I have been alluding. We also 
will examine the compiler, algorithms and 
code for automatic condition entry, find- 
ing missing rules, eliminating redundancy 
and contradiction, automatic table com- 
pression, sorting and optimizing tables, 
and other interesting topics. 

In Part III we will explore the decision 
table interpreter as well as look into the 
grid chart editor and translator and other 
related topics such as a natural language 
front-end and factoring probabilities into 
decision tables. 

See you next month! M 
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Introducing the MIX Editor 

(with Split Screen - both horizontal and vertical) 
A Powerful Addition To Any Programmer's Tool Box 



Full Screen Editing 
WordStar Key Layout 
Custom Key Layouts 
Terminal Configuration 
Help Files 
Backup Files 



Introductory' Offer 
Only 
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30 Day Money Back Guarantee 
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Great For All Languages 

A general purpose text 
processor, the MIX Editor is 
packed with features that make it 
useful -with any language. It has 
auto indent for structured 
languages like Pascal or C. It has 
automatic line numbering for 
BASIC (255 character lines). It 
even has fill and justify for 
English. 

Terminal Configuration 

A utility for denning terminal 
features (smart features 
included) allows the editor to 
work with any terminal. Over 30 
of the most popular terminals are 
built-in. 

Custom Key Layouts 

Commands are mapped to keys 
just like WordStar. If you don't 
like the WordStar layout, simply 
change it. Any key can be 
mapped to any command. You 
can also define a key to generate 
a string of characters, great for 
entering keywords. 

Split Screen 

You can split the screen 
horizontally or vertically and edit 
two files simultaneously. 

Macro Commands 

The MIX Editor allows a 
sequence of commands to be 
executed with a single keystroke. 
You can define a complete 
editing operation and perform it 
at the touch of a key. 
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Custom Setup Files 

Custom keyboard layouts and 
macro commands can be saved 
in setup files. You can create a 
different setup file for each 
language you use. The editor 
automatically configures itself 
using a setup file. 

Command Mode 

Command mode allows any 
editor command to be executed 
by name. It is much easier to 
remember a command name 
versus a complicated key 
sequence. Command mode 
makes it easy to master the full 
capability of the editor. 
Frequently used commands can 
be mapped to keys. Infrequent 
commands can be executed by 
name. 

Editor Commands 

The editor contains more than 
1 00 commands. With so many 
commands, you might think it 
would be difficult to use. Not so, 
it is actually extremely simple to 
use. With command mode, the 
power is there if you need it, but 
it doesn't get in your way if you 
don't. Following is a list of some 
of the commands. 



Cursor Commands 

Left/Right/Up/Down 
Tab Right/Tab Left 
Forward Word/Backward Word 
Beginning of Line/End of Line 
Scroll Up/Scroll Down 
Window Up/Window Down 
Scroll Left/Scroll Right 
Top of File/Bottom of File 

• • • 

Block Commands 

Copy/Move/Delete 

Read/Write 

Lower Case/Upper Case 

Fill/Justify 

Print 

File Commands 

Directory (with wild cards) 
Show File/Help File 
Input/Output File 
Delete File/Save File 

Other Commands 

Split Screen/Other Window 
Find String/Replace String 
Replace Global/Query Replace 
Delete Line/Undelete Line 
Delete Word/Undelete Word 
Insert Mode/ Overwrite Mode 
Open Line/Join Line 
Duplicate Line/Center Line 
Set Tab/Clear Tab 

• • • 
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We're getting hardnosed 
at Softway. 

From now on MATIS is only $49 9S ! 

(MATIS, the complete User Interface development tool has been selling for $150.) 



Why the radical price cut? 

We decided after looking over the compe- 
tition that MATIS had so many advan- 
tages it should be made available to more 
programmers. We decided to compete 
aggressively so you could easily afford to 
have MATIS in your bag of tricks. We 
hear from MATIS users in the USA and 
France that it is a truly loveable product 
Sooo. ..we're running this big ad to pro- 
mote our new low price. 

MATIS windows are beautiful. 

Display any portion of any screens you 
create at any point in your program. 
Scroll in any direction manually with cur- 
sor keys. ..or automatically. 

And the screens are 
HUMUNGEOUS! 

MATIS screens can bejust about as big as 
you want.. .up to 65,534 rows by 
65.534 columns! The number of screens 
is only limited by available memory. 

Print big MATIS screens directly. 

One command sends your screens to your 
printer with no need to program special 
routines when your virtual screen is big- 
ger than your terminal screen. 

User input fields are a snap. 

Creating fields for data entry is easy with 
no limit to size or number by screen. 
Request for input 
separately or 
in blocks, yi 
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President Softway, Inc. 

Control your keyboard 
with MATIS. 

It keeps track of keys that are pressed 
during the execution of your program 
and lets you assign specific functions to 
selected keys. 

Control that screen too! 

MATIS is extremely versatile and flexible 
when it comes to controlling lines, col- 
umns, fields, and text They can be modi- 
fied, transferred, displayed or moved 
with a single command. All video attri- 
butes are supported: color, reverse video, 
blinking. ..you name it. you got it. 

Want an interactive 
screen builder? 

You've got it with MATIS. It's called 
"MATPAGE"'" and it lets you create 
and modify any of your screens in an 
interactive mode. 



MATIS adds over 70 routines 
to your program. 

Written in Assembler. MATIS routines 
are fast and powerful giving your pro- 
gram improved efficiency and enhanced 
visual appeal, while they reduce its size 
and maintenance worries. And MATIS 
separates screen design from the core 
of your program. 

MATIS is unique. 

We don't think there's a single program 
that combines as many tools in one 
package as completely or as well as 
MATIS. It interfaces with Intepreted and 
Compiled BASIC (Microsoft). C (Lattice, 
Microsoft, Aztec), PASCAL (IBM, Micro- 
soft) and ASSEMBLER. All you need 
is an IBM* PC/XT or true compatible 
under DOS, 128k or RAM, monochrome 
or color monitor. 

You get an easy to follow no-frills 
manual and a 30-Day Money Back 
Guarantee. 

Late News: 

MATIS/T"* for TURBO-PASCAL** 

only $29.95 

An indispensable add-on at a dynamite 
price. What more can we say? 
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Programming techniques 
and products that put 
English on your PC 



. Natural 
Language 

Software 




r ou probably 
remember the 
movie "2001" 
for its 

artificially intelligent computer. HAL. 
Not only was HAL a smooth talker, he 
was a canny listener, able to understand 
and obey spoken commands. 

With the real 2001 just 16 years away, 
are we much closer to building computers 
that can communicate as naturally as 
HAL? Might the sixth generation com- 
puter language be English? Let's 
consider. 

Computer scientists have made great 
strides in natural language processing 
(NLP) since "200 1 " was released. Pro- 
grams have been demonstrated that can 
translate natural languages, 1 paraphrase 
simple texts," even read and answer ques- 
tions about AP news stories.'' Natural lan- 
guage data base systems are especially 
popular items, and not just in the lab. Try 
your nearest mainframe computer, where 
natural language query products like 
Intellect 4 have been available for years. 

Or try your personal computer. You can 
buy natural language data bases for your 
PC or if you're ambitious, implement one 
yourself. 

In this article we'll look at the problems 
NLP poses and discuss some techniques 
for solving them. We'll explain a popular 
method for parsing English sentences. 
We'll also take a hands-on look at two nat- 
ural language data bases for PCs that 
show just how far NLP has come and sug- 
gest how far it may yet go. The problem 
of implementing HAL we'll leave as an 
exercise for the reader. 



By Darryl Rubin 

Natural history 

NLP research is older than you might 
think. People were experimenting with 
natural language software before HAL 
was even a gleam in Stanley Kubrick's 
camera lens. 

The earliest efforts^ focused on the 
problem of determining (he grammatical 
structure of English sentences, a process 
you compiler writers will know as par- 
sing. These early programs did nothing 
more than diagram input sentences, pro- 
ducing parse trees like the example in Fig- 
ure 1. 

Recent programs are much more 



A parse tree 



impressive because they attempt to under- 
stand and act on the actual meaning of the 
input sentences. One program. 
SHRDLU.'' could move objects about a 
simulated world based on English 
requests: the program could also under- 
stand and correctly answer questions 
about the current state of its world. 
Another program. SAM.' could read sim- 
ple stories and answer questions about 
them, in many cases inferring information 
that wasn't explicitly stated. 
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The mean hacker crashed 

Figure 1. 
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Understanding natural language is no 
small feat. Language is rich in ambiguity, 
innuendo, and sometimes just plain 
sloppy grammar. Indeed, human beings 
often have trouble understanding it! The 
first step then, is to simplify the NLP 
problem by breaking it down into several 
smaller problems, or phases. 

If you've ever written a compiler, 
you'll know right off that NLP can be 
divided into three phases: lexical, syn- 
tactic, and semantic analysis. You start 
with an input string of one or more 
English sentences. Lexical analysis sepa- 
rates the string into individual words and 
classifies them according to a dictionary. 
Syntactic analysis groups the words into 
phrases and phrases into sentences. 
Semantic analysis figures out what the 
sentences mean. 

Some linguists will point out that true 
NLP requires a fourth phase called prag- 
matics that deals with the overall commu- 
nicative intent of a dialog. For example, 
the statement "That's wonderful" means 
one thing on the surface but quite another 
if it is a response to "Taxes just went up," 
The difference is one of pragmatics. 

As you can imagine, semantic and prag- 
matic analysis of natural language arc 
unsolved problems. Let's just get a feel 
for them before moving on to the more 
tractable lexical and syntactic phases. 
Look at these two sentences: 

Babe Rufh threw a ball. 
Queen Victoria threw a ball. 

Syntactically these sentences are identi- 
cal and unambiguous. But how different 
the meanings of the words "threw" and 
"ball." 

Ambiguity can, of course, be a prob- 
lem, as in "I saw Nero on the stage with 
binoculars." Think carefully: Who has 
the binoculars, me or Nero? For that 
matter, which of us is on the stage? Also 
ask yourself, would a computer under- 
stand that Nero must be a character in a 
play, not the historical emperor of Rome? 
Now consider this pair of sentences: 



Nothing is better than complete hap- 
piness in life. 

A ham sandwich is better than 
nothing. 

Unless a computer is awfully smart about 
interpreting these sentences, just image 
the conclusion it's likely to draw! 

Lex education 

Perhaps a HAL could deal with problems 
like these, but practically speaking, you 
can implement useful NLP programs just 
by doing a good job at lexical and syn- 
tactic analysis. This is because most pro- 
grams are written to solve specific prob- 
lems, like data base inquiry, and in these 
limited domains the range of possible 
meanings is small. For example, data base 
query systems deal only with variations 
on a single meaning: find information in 
the data base. 

Whereas HAL could understand spoken 
inputs, most of today's NLP programs can 
only deal with written input— text strings. 
We said earlier that lexical analysis is the 
first step in processing natural language. 
The lexical analyzer breaks the input 
string into its component words and 
important punctuation marks, like sen- 
tence endings. It then looks up the words 
in a dictionary to check whether they are 
known and if so to attach important fea- 
tures to them, like parts of speech- 
article, noun, adjective, verb, etc. (or 
several of these for words with multiple 
meanings). Words not found in the dictio- 
nary may be removed from the input or 
spell correction may be attempted. 

Identifying word and sentence endings 
may sound simple enough until you real- 
ize how creatively the rules of punctuation 
can be applied by some writers. Also con- 
sider the problem that abbreviations, con- 
tractions, and compound words can cre- 
ate. Abbreviations end in a period, which 
may look like a sentence ending. Con- 
tractions use apostrophes, which arc also 
used in quotations and possessives. Com- 
pound words use a hyphen, which can be 
confused with a word break at a line 
boundary. Try this sentence out on your 
lexical analyzer: "Don't tell me the com- 
puter 'eats' double-sided diskettes— that's 
nonsense!" said the Jr. Programmer's 
boss. 

The easiest way to handle difficulties 



like these is with a good dictionary. For 
example, the dictionary can be used to 
expand abbreviations and contractions to 
full words or to disambiguate the use of 
hyphens by checking whether removing 
the hyphen results in a valid word. The 
dictionary is less useful for dis- 
ambiguating the different uses of apostro- 
phes, so heuristics must be developed to 
do this job. 

Another tactic that works for some 
applications is to simply ignore punc- 
tuation. Natural language query systems 
typically do this, including the ones we'll 
talk about later. But a general-purpose 
understander can't take it quite that easy. 
Try making sense of "Thai's what I meant 
you thought." Confusing, yes? But add 
just one little comma and a plausible 
meaning emerges: "That's what I meant, 
you thought." 

The dictionary can be used to simplify 
input text in more profound ways than 
merely eliminating abbreviations and con- 
tractions. For example, certain entries 
can be marked as "noise words" that are 
to be removed from the input text; other 
words or entire phrases can be marked for 
replacement by predefined synonyms. 
Combined with an algorithm for 
removing suffixes and prefixes, the dic- 
tionary can also help transform words to 
their root forms. Simplifications like 
these remove unnecessary detail and make 
the input text easier to analyze. 

In some applications you can even 
shrink sentences to a few key words that 
convey all the needed information. Many 
adventure games work this way, isolating 
a single verb and object out of the player's 
input. "Let's drop the shovel here" 
becomes "Drop shovel." 

Another program thai uses such tech- 
niques is a full text retrieval system called 
SIRE. Similar in concept to the Dialog 
Information Service, SIRE lets you store 
documents on disk and retrieve them 
based on queries like "Show me articles 
about natural language" or "Have you got 
anything about cognition dated 1985?" 
SIRE doesn't actually parse or under- 
stand natural language. But by clever 
noise-word filtering, root-word extrac- 
tion, and synonym lookup, it reduces que- 
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ries like the two preceding ones to the 
essential retrieval keys "natural lan- 
guage" and "thinking or cognition, date 
1985." 

Grammar school 

The syntactic phase of NLP is the one you 
probably learned the most about in 
school. It's what 12 years of English class 
were all about. 

Syntactic analysis concerns itself with 
the rules of grammar— that is, the rules 
for combining ihe basic parts of speech 
into phrases, clauses, and sentences. The 
problem for NLP is to use these rules to 
analyze an input sentence and produce a 
parse tree representing the sentence's 
structure. Figure 1 shows a parse tree for 
the sentence "The mean hacker crashed 
the system." 

The hardest part of syntactic analysis is 
to encode the grammatical rules that guide 
the building of parse trees. Natural lan- 
guages have very complex grammars that 
are context dependent, not context free 
like those for computer languages. This 
means that the role one word plays in a 
sentence depends on other words in com- 
plex ways. Take this example: 

Time flies like an arrow. 
Fruit flies like a banana. 

In the first sentence, "flies" is a verb and 
"like" is a preposition. In the second, 
"flies" is a noun and "like" is a verb. 
How can a parser analyze sentences like 
these? First, it must depend on the lexical 
analyzer to mark each word with every 
role the word can play. Second, the parser 
may need to backtrack— that is, when 
finding an ambiguous word, pick the most 
likely meaning and proceed with the 
parse. If the parse fails, back up and retry 
with another of the possible meanings. 

The more you think about complexities 
like this, the more you realize that a natu- 
ral language parser is a kind of expert sys- 
tem whose knowledge base is a set of 
grammar rules. How can these rules be 
encoded? The most well-proven method is 
to use augmented transition networks 
(ATNs).* like the ones shown in Figure 2. 

ATNs will look familiar if you've ever 
seen the syntactic flow diagrams used to 
specify computer languages like Pascal. 
But there's more to ATNs than meets the 
eye. Let's see how they work. 



The ATN in Figure 2A says that a sen- 
tence (S) consists of a noun phrase (NP) 
followed by a verb phrase (VP). This is 
because crossing the NP arc followed by 
the VP arc leads to a success node (indi- 
cated by double circles). 

But what is a NP? It is another ATN 
(Figure 2B), which says that a NP consists 
of an optional determiner (DET) followed 
by zero or more adjectives followed by 
one or more nouns— for example, "The 
(DET) lazv (ADJ) computer (N) operator 
(N)." 

Using an ATN is like finding a path 
through a maze. If you can get to a success 



node, the parse succeeds (the sentence 
was grammatical), otherwise it fails (the 
sentence was probably everyday 
English!). 

So far, ATNs sound just like syntactic 
flow diagrams. What puts the A in ATN is 
that each arc is augmented with a pro- 
cedure that must be executed to determine 
whether the arc is currently available for 
crossing. These arc procedures can 
inspect the input string, modify it, even 
maintain local and global state informa- 
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tion in registers that are totally separate 
from the transition network ilself. 

Most importantly, the arc procedures 
are responsible for building the parse tree 
a node at a time as the network is 
traversed. They use the registers to do 
this. Registers are usually defined that 
correspond to major sentence features like 
the subject, object, verb, tense, and so on. 
As the parser classifies words in the input 
string it appends them to the appropriate 
registers, then assembles the register con- 
tents into parse tree nodes when the neces- 
sary preconditions for doing so have been 
satisfied (such as reaching a success node 
of the ATN). 

To move from one node to another, the 
parser must evaluate (call the procedure 
of) each outgoing arc to determine which 
one is available for crossing. For exam- 
ple, the arcs labelled N in Figure 2B can 
only be crossed when the current input 
word is a noun. Likewise, the ADJ arc 
requires an adjective. PP arcs require a 
prepositional phrase, V requires a verb, 
and soon. (Arcs labelled "*" are always 
available for crossing— they provide a 
way to make certain grammatical features 
optional.) 

Generalizing on this notion, an arc 
labelled with the name of another ATN 
requires that the specified ATN be 
traversed successfully. In other words, the 
named ATN is called as a (possibly recur- 
sive) procedure. Notice in Figure 2 how 
the NP ATN calls PP which in turn calls 
NP. This mutual recursion could con- 
ceivably occur for call after call after call 
after call! 

Of course, not all kinds of repetition 
are legal in English. For instance, double 
negatives are a no no (ahem). How can the 
VP ATN (Figure 2C) detect them? Simply 
by setting a flag register in the NEC pro- 
cedure to bar thai arc after the first time 
through. The VP ATN must also check for 
invalid verbs forms; it's OK to write 
"have goofed" but not "have goof." The 
V arc from NP/AUX to VP/V tests for this 
mistake — it blocks itself if "have" was 
seen as an auxiliary verb (AUX), but the 
current word is not a past participle. 

When checking for available arcs, the 
parser may find itself with several that can 
be taken. The NP/N node in Figure 2B 



presents one such dilemma: it has two N 
arcs leaving it. When this happens, the 
parser must backtrack as previously 
explained, trying each of the alternatives 
until one succeeds or all fail . This gets 
slow in a hurry, so be sparing of multiple 
choice nodes in your own ATNs. 

A Savvy Retriever 

With all the effort that's gone into refining 
ATN parsers and other NLP algorithms, it 
should come as no surprise that the tech- 
nology has begun appearing in micro- 
computer products. One of the first of 
these is a natural language query system 
called Savvy Retriever. 

The surprising thing about Savvy is that 
it uses none of the established NLP tech- 
niques. Savvy's approach is Savvy's own. 
And there's a good reason for this. 

Classical parsers are built to process 
grammatically correct sentences and to 
reject incorrect ones. But how many of us 
are grammatically correct all the time? 
We use flaky syntax, fragmentary sen- 
tences, misspelled words, bad punc- 
tuation, you name it. The most convoluted 
command language would probably be 
easier lo use than one that required perfect 
English! 

Savvy's unique approach is to dispense 
with parsing almost entirely. Instead, this 
program relies on a technique called adap- 
tive pattern recognition. Rather than ana- 
lyze your query 's grammatical structure 
(which may not exist), Savvy asks itself 
"Of all the queries I've ever seen, which 
one does this most resemble? Is there a 
pattern here thai I recognize?" If so, 
Savvy assumes the new query is equiv- 
alent to the one it had seen before. The 
program will optionally display the for- 
mal interpretation of your query so you 
can verify it. To get an idea of how Savvy 
works in practice, a complete, annotated 
transcript of a Savvy work session is 
available as SAVVY.LOG on the 
COMPUTER LANGUAGE Bulletin Board 
Service or account on CompuServe. 

Savvy's pattern recognition process is 
fascinating. The program operates on 
your query's representation as a string of 
bits in computer memory — not sentences, 
not words, bits . Through a series of math- 
ematical transformations that are anal- 
ogous to hash coding. Savvy derives from 
this bit string a set of numbers that repre- 



sents a coordinate in an abstract space of 
200 dimensions (!), 

Savvy's pattern memory consists of 
clusters in this space, each of which rep- 
resents a specific word, phrase, or query 
(hat it understands. Pattern matching is 
simply a matter of seeing if your query's 
spatial coordinate lies within any of the 
prestored clusters. (These clusters are 
created at the factory in a training process 
where Savvy is presented with sets of dif- 
ferent queries that mean the same thing. ) 
If Savvy can't match your query as a 
whole, it splits the query into smaller 
parts and pattern matches those, recur- 
sively to the word level if necessary. 

The beauty of this approach is that 
Savvy is incredibly tolerant of mis- 
spellings and excess verbiage. More often 
than not, it focuses on the significant con- 
tent of your query and within limits 
(you'll see later) produces the desired 
information. 

Like its strengths. Savvy's drawbacks 
result from its pattern matching algo- 
rithm. Pattern matching is not the same 
thing as understanding. Savvy cannot per- 
form calculations because it cannot parse 
expressions; you can't ask it to average a 
data base field, for example. This lack of 
expression handling also makes Savvy 
weak at handling complex Boolean 
retrieval conditions, as in "List all 
employees who arc under thirty five and 
single or over forty and married." Worse. 
the pattern matcher may misinterpret que- 
ries. For example, it may interpret "List 
recently hired employees" as "List 
recently fired employees." 

Another weakness is that Savvy's pat- 
tern memory can only be trained at the 
factory (the process involves massive 
number crunching). To make up for this. 
Savvy lets you define literal synonyms for 
words it already understands: you may 
define synonyms for any of Savvy's 85 
built-in words or for any field label or 
data value in your data base. Unfortu- 
nately, you cannot define synonyms for 
phrases. For example, you can't define 
"highly paid" to mean "salary greater 
than 40000"; Savvy will insist you pick 
between defining a synonym for "salary" 
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(a Hold label) or "greater than" (a built-in 
operator). 

Queries with Clout 

Savvy's holistic, pattern matching 
approach to NLP contrasts sharply with 
the analytical, logic-based technique used 
by Clout, another natural language query 
system for PCs. Much more than a parser. 
Clout is an expert system that understands 
how people ask questions. And it under- 
stands very well indeed. A complete, 
annotated Clout session is also available 
on the COMPUTER LANGUAGE BBS and 
on CompuServe— look for the file name 
CLOUT.LOG. 

Like Savvy, Clout is tolerant of 
ungrammatical. fragmentary, misspelled 
queries. But there the similarity ends. 
Clout analyzes your query to the /Vth 
degree, testing it against a knowledge 
base of if/then rules that encode expertise 
about data base queries. For example, one 
of Clout's rules says "lithe word TOP is 
present, the phrase following it is proba- 
bly a ranking criterion." So it understands 
"What are the top 3 salaries?" 

Via such rules. Clout tries to assign 
meaning to eveTy word in your query. If it 
runs into trouble, the program uses ATNs 
to provide additional information and may 
even ask you to define unknown words. 
Clout's parser understands mathematical 
expressions as well as English grammar, 
so Clout can perform calculations ("What 
is Jones' salary * 1 . 10'?"). 

Unlike Savvy, when Clout doesn't 
understand something it immediately 
gives you a list of guesses to choose from 
or asks you to enter a synonym. This 
makes it a snap to adapt Clout to your 
question asking style. Clout is much more 
trainable than Savvy because it has a 
larger vocabulary (300 words) and a more 
powerful synonym capability. What's 
more, you can define synonyms for entire 
phrases, and the definitions can take 
parameters. This lets you define "works 
for@X" as "supervisor = @X" so you 
can ask "Who works for Bronson?" 

Clout draws knowledge not just from its 



dictionary and knowledge base but also 
from your data base. Clout knows how to 
use the data base schema to retrieve infor- 
mation from up to five files. The program 
automatically performs whatever data 
base operations are needed (select, 
project, join) to retrieve the desired 
information. 

Unfortunately, Clout can't show you the 
formal representation of your query as 
Savvy can. This is because Clout trans- 
lates your query directly into data base 
I/O operations. In fact, the data base I/O 
interface that Clout uses is available sepa- 
rately from Microrim as a product called 
PI (Program Interface). Clout itself isjust 
a big Fortran program (!) written on top of 
the PI. 

Natural selection 

Clout and Savvy represent impressive 
first steps toward NLP on personal com- 
puters. They also demonstrate that the 
first two decades of natural language 
research didn't exhaust all the good ideas. 
Savvy's pattern recognition algorithm 
works well for simple but imprecise que- 
ries against single files. Clout's expert 
system approach makes short work of 
complex, multifile queries and 
calculations. 

These two products and their succes- 
sors will surety evolve, not just in terms of 
their ability to understand, but also in 
terms of their ability to act. Will future 
data bases perform natural language 
updates as well as queries? Will future 
word processors use NLP to rephrase 
poorly written passages and summarize 
documents for quick reading? Will your 
future computer answer questions as 
smoothly and intelligently as a HAL? 
Perhaps. 

If it doesn't start asking you questions 
first, n 
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Learning 
about 

PROLOG 




n 1981 it was 
announced that 
Japan had chosen 
the programming 
language PROLOG as the basis for soft- 
ware to be developed in the Fifth Gener- 
ation Computer Project. One of the aims 
of this project was to make software that 
would be truly handy for users. 

The choice of PROLOG caused a great 
deal of attention to be focused on the lan- 
guage. Until then, it had been a research 
language, first developed at Marseilles, 
France, and later extended at Edinburgh. 
Scotland, and other centers. 

The purpose of this article is to give an 
indication, through simple examples in 
PROLOG, of what is distinctive about the 
PROLOG programming style and why it 
is especially suitable for user-friendly 
applications. 

A number of versions of PROLOG are 
available, with some differences in syn- 
tax. But generally, the accepted standard 
seems to be the version given in the first 
definitive textbook on PROLOG. Pro- 
gramming In PROLOG by W.F, Clocksin 
and C.S. Mellish. This is essentially the 
Edinburgh University version of 
PROLOG. 

The examples in this article will be 
mostly in terms of the C & M standard 
version, which, with some minor mod- 
ifications, is used by most mainframe and 
micro versions of PROLOG. We will also 
illustrate the Micro-PROLOG version of 
PROLOG, which is put out by Logic Pro- 
gramming Associates for IBM PCs and 
Apple computers using CP/M. 



By Ramachandran Bharath and Margaret Sklar 



A deductive data base 

PROLOG is a portmanteau word derived 
from PROgramming in LOGic. A PRO- 
LOG program consists of declarations of 
relationships between objects. During 
program execution. PROLOG draws log- 
ical deductions from facts or relationships 
the user has supplied. This process makes 
PROLOG distinctly different from other 
programming languages. 

The key characteristic of other pro- 
gramming languages is that the user has to 
specify step-by-step procedures the com- 
puter must carry out to obtain the output 
the user wants, using the input data. 

It is true that the specification of these 
procedures has been made easier and eas- 
ier through the years— assembly language 
made the task easier than machine coding 
by allowing the use of symbolic names 
instead of numeric code. High-level lan- 
guages made the task even easier by 
allowing almost-English instructions 
instead of the almost-machine instructions 
of assembly language. For example, to 
add two numbers in assembly language, 
you have to give instructions like: 

■ Move first number from memory to 
register 

■ Move second number from memory to 
register 

■ Add the two numbers 

■ Move the result back to memory. 
High-level languages allow the use of 

instructions I ike Result := First + Sec- 
ond, which certainly has made the writing 
of programs closer to human language. 
Bui it is still necessary to keep in mind the 
mode of operation of the machine and tai- 
lor the programs to these modes of 
operation. 

The goal of programming in logic is to 



make the task of programming even eas- 
ier. The user only has to focus on the 
relationships between the data available 
and the results required, leaving it to the 
PROLOG system to work out the pro- 
cedure or steps required to obtain the 
results. 

This characteristic of PROLOG can be 
illustrated by looking at the important fac- 
ets of programming in PROLOG. The 
first facet is thai the user supplies the sys- 
tem with a data base of facts relevant to 
the problem. 

A fact in PROLOG is expressed as a 
relationship connecting one or more 
objects. For example, a PROLOG data 
base could consist of the following facts: 

firstname(srnith,john) 

firstname(adams,obigail} 

f[rstname(Fonda,jane) 

firstname (reagan,ronald) 

firstname(vanburen,abigail) 

firstname(kennedy,john) 

The relationship is called the predicate 
(all the facts given above havefirstname as 
(he predicate), and the objects related by 
the predicate are the arguments. A predi- 
cate can have one or more arguments, 
though when there is only one argument, 
you tend to think of it more as a property 
than a relationship — for example, 
youngQim) or sleeps(bob). Micro- 
PROLOG has a minor difference: com- 
mas are not necessary between objects. 
Also, with facts that involve one or two 
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objects, you are allowed to use alternative 
versions, like (bob sleeps) or (reagan first- 
name remold). 

The simplest use of PROLOG is to 
make a straight search to see whether or 
not a particular fact is in the data base. 
The various implementations of PROLOG 
make this search in slightly different 
ways. In the standard C & M versions, 
you would ask a question: 

?-firstname(reagan,ronald). 

In the micro-PROLOG version, you 
would ask: 

is(firstname(reagan ronald)) 

In either case, the system would 
respond with "yes." The question 
?-firsmame(nixon,richard). would pro- 
duce the response "no" since the fact is 
not in the data base, even though it is true 
in real life. Asking a question is referred 
to as setting a goal for the PROLOG sys- 
tem to satisfy. 

PROLOG can do much more than a 
straight search. The next step up would be 
to make a selective search by giving part 
of the information and asking the system 
to locate and supply the rest of the infor- 
mation. For instance, in Micro-PROLOG 
you could ask the question: 

which( x : firstname(fonda x) ) 

and the system would search the data base 
and supply the answer: 

jane 

If a version close to the C & M standard 



is used, the question could be phrased: 

?-firstname(fonda,Whar). 

and the system would respond with: 

What = jane 

Important to note is that PROLOG 
works by pattern matching to try to satisfy 
the goal. Also, the symbols A", Y,Z,x, y.z 
... arc treated by Micro-PROLOG as 
variables to which any value can be 
attached. Similarly, in the standard ver- 
sions any word starting with an upper- 
case letter ( What in the above example) is 
treated as a variable. So the system is able 
to match the question firstnameffondax) 
or firstname (fonda.Witat). with the fact 
firstname (fonda jane) or first- 
nameffonda.jane) in the data base and 
supply the answer jane or What = jane. 

What if more than one solution can be 
found by pattern matching? It is instruc- 
tive to consider what would happen if you 
were to ask the Micro-PROLOG question: 

which( y x : firstnamefy x) ) 

PROLOG always works by searching 
the data base in the order the facts have 
been entered. So in (his case the first 
match that would be found would be with 
y= smith and.v = John . Micro-PROLOG 
would print out the solution: 

smith john 

then look for the next match and print out 
admits abigail and so on until it can find 
no more solutions. 

Micro-PROLOG also allows you to get 
only as many of the possible solutions as 
you want by asking the question in the 
form: 



one{ y x : firsfname(y x) ) 

In this ease, Micro-PROLOG would print 
out the first solution it finds and then ask 
the user for a yes/no to whether more 
solutions should be searched for. Simi- 
larly, in the standard versions the system 
would produce one solution and wait for 
the user to indicate whether more solu- 
tions are to be searched for. 

Wilh the C & M standard , the user 
types in a semicolon and the system will 
search for alternative solutions; if the user 
hits the carriage return, the system will 
not look for any more possible answers. 

One of the versions available for IBM 
PCs. PROLOG-86, uses a different con- 
vention. It automatically prints out all the 
answers. You can indicate to the system 
that you do not want more than one solu- 
tion by using the cut operator, which is /. 
For example, you could ask a question as: 

?-firstname(Who,john), !. 

to indicate that you want only one solu- 
tion. If the .' is omitted, the PROLOG-86 

system would find all possible solutions. 

Rules in PROLOG 

Wc have seen that the basis of PROLOG is 
its flexible, deductive data base. But what 
really lends PROLOG its power as a user- 
friendly language is that you can ask the 
system to draw logical deductions based 
on rules. All the user has to do is specify 
the pattern of deductions required, and the 
system takes on the task of interpreting 
the logical specifications as procedures 



samefirstname(xl x2) if firstname(xl x) and firstname(x2 x) and not(xl EQ x2) 
saraefirstname(One, Other) :- firstname (One, Something), 

firstname(Other, Something) , 
One <> Other. 
(standard version) 



Listing 1. 
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and then executes them. In other words, a 
human being focuses on the logical speci- 
fication of the problem while the PRO- 
LOG system attends to the procedural task 
of executing the specification. 

To illustrate how rules work, let us con- 
sider the data base of first names we 
looked at before. Suppose the user wants 
to extract information on which pairs of 
persons have the same first name. A rule 
would be added to the data base (Listing 
1). 

You can sec the Micro-PROLOG rule is 
really a logical specification saying that 
xl and x2 have the same ft rstname if the 
firstname oixl and x2 are the same x , and 
xl and x2 are different persons (not(xl EQ 
x2)). The other version of the rule says 
the same thing. ;- stands for //, and < > 
stands for not equal to, though some ver- 
sions use different symbols for these con- 
cepts. The user does not have to give any 
procedural directions to the system on 
how to implement this search task. It is 
the system that makes a procedural inter- 
pretation of the logical specification or 
declaration made by the user. It interprets 
this procedurally in the following manner. 

To find two persons with the same first 
name, first find a person with some first 
name (.v or Something ), then find another 
person with the same first name and check 
that the two persons are not the same. It is 
useful to think of a rule as something that 
sets multiple goals for the system to 
satisfy. 

In this example, if you ask the Micro- 
PROLOG question: 

one( x y : samefirstname{x y) ) 

the system would print out the answer: 

smith kennedy 

and ask the user if another solution should 
be found. If the user says yes, the system 
will resume the search and give a second 
solution: 

adams vanburen. 

Let us analyze in detail how the system 



would find the solution to the standard 
PROLOG question: 

?-samefirstname(Who, Whoelse). 

It first tries to match the goal set by the 
question with a fact or rule in the data 
base. In this case, it can only find a match 
with a rule and matches Who in the ques- 
tion with One in the rule and Whoelse in 
the question with Other in the rule. A 
rule, as we have seen, is really a condi- 
tional goal connected by an if (ox :- ) with 
other goals. So here it tries to satisfy each 
of the goals in the rule, going from left to 
right. 

The system is able to satisfy the first 
goal, firstname (One, Something) by match- 
ing One with smith and Something with 
John. 

It now tries to satisfy the second goal , 
which has become firstname(Other.jo)m) . 
It is important to note that in satisfying the 
first goal, the variable Something has 
acquired the value John —it is no longer a 
variable. The \a\ua joint carries through 
to all the other goals in the rule. 

The system satisfies the second goal by 
again searching the data base, starting at 
the top, and assigns the value smith to 
Other. Remember, to satisfy any goal, the 
system always starts its search at the top 
of the data base. 

It now tries to satisfy the third goal. 
One < > Other. It fails to satisfy this 
goal because both One and Other have 
been assigned the value smith. 

We now come to a very important char- 
acteristic of PROLOG: backtracking. 
When a goal fails, the system goes back to 
where it satisfied a previous goal and 
starts searching further in the data base. 
So in this case it cancels the value il allot- 
ted to Other and searches further down the 
data base to try and find a solution to the 
second goa\,firstname(Other,john) . 
Clearly, it can satisfy this only when it 
gets to firstname (kennedy John) . Now it 
again tries to satisfy the third goal. 
One < > Other, and succeeds this time 
since One is smith and Other is kennedy . 
Since all the goals in the rule have been 
satisfied, it prints out the solution: 

Who = smith Whoelse = kennedy 

By applying this principle of back- 



tracking, we can see that if we ask for 
more solutions, the system will backtrack 
to the first goal in the rule and satisfy first- 
namefOne, Something) with One = adams 
and Something = abigail. It will now try 
to satisfy the second goal in the form ftrst- 
name(Other.abigail) . Once again it will 
satisfy this second goal with Other — 
adams , but this will lead to failure on the 
third goal. So it will backtrack, find Other 
= vanburen to satisfy the second goal, 
and finally succeed on the third goal as 
well and print out the second solution Who 
= adams and Whoelse = vanburen. 

Keeping in mind the fundamental prin- 
ciple of backtracking when satisfying 
multiple goals, the reader will certainly be 
able to deduce that if we ask for more 
solutions, the system will provide the 
answers: 

vanburen adams 
kennedy smith 

in that order. In the standard version you 
would get a scries of answers: 

Who = vanburen Whoelse = adams 

and 

Who = kennedy Whoelse = smith 

provided the system is prompted for more 
answers by typing a : each time. 

Let us consider one more example with 
an extended data base containing two 
more sets of facts (Listing 2). 

A rule can be based on more than one 
type of fact. For example, suppose we 
want the system to use the data base to 
find out for us the names of owners of a 
particular type of computer in a particular 
city. That is. wc want to ask for names of 
say, Apple II owners in Philadelphia. We 
could of course ask a combined question: 

?-lives_at( Who, Some where, 

philadelph ia), has_computer 
(Who,applell). 

What wc are doing here is asking the 
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system to satisfy two goals or find 
matches for both the facts in our question. 
But it would be more convenient to design 
a rule as in Listing 3. 

Now if we ask a question: 

?-owns(Who, applell, Philadelphia), 

the reply would be: 

Who = adorns 

This response is in accordance with the 
principles we have discussed of the way 
PROLOG tries to find matches starting at 
the top of the data base. 

We can sec something of the flexibility 
of PROLOG by considering a different 
type of information we could extract from 
the same data base of rules and facts. If we 
pose the question in the form: 

?-owns(Who,applell,Where). 

we would be able to get the names of all 
Apple II owners in our data base, along 
with the city in which they live. 

Recursion in PROLOG 

We have discussed the basics of how 
PROLOG can be used flexibly as a power- 
ful, deductive data base. One other valu- 
able feature of PROLOG is the facility it 
provides for writing recursive programs. 



A recursive procedure or rule is defined 
as one that involves using the same rule as 
part of the application of the rule. A typi- 
cal recursive definition would be for 
reversing a list of names or numbers in the 
following manner: to reverse a list, 
reverse (he rest of the list, then add the 
first item at the end. This example shows 
that to reverse a list, we use the same 
reverse operation on the rest of the list. 

What distinguishes a recursive defini- 
tion from a circular one is that it does not 
go on endlessly. In the preceding exam- 
ple, when we apply the definition of 
reverse to the rest of the list (from item 2 
onward), the definition tells us to again 
reverse the list from item 3 onward and 
put item 2 at the end of the list, which in 
turn leads us to reverse the list from item 4 
onward. However, a stage is reached 
when the list is empty, and to reverse an 
empty list we keep it as it is. So the pro- 
cedure does operate noncirculariy (List- 
ing^. 

The situation where recursion ends is 
called the boundary condition. In this 
case, it is the rule that reversing an empty 
list gives an empty list. 

The recursive rule for finding the larg- 
est number in a list of numbers can be for- 
mulated as follows: to find the largest 
number in a list, compare the first number 
with the largest number in the rest of the 
list and choose whichever is bigger. 

We can see that this involves finding the 
largest number in the list from item 2 



onward, which in turn involves finding 
the largest number in the list from item 3 
onward. But it is not endless, for the 
boundary condition is reached when the 
list has only one number— the largest 
number in the list is just that number. 

To write a PROLOG rule for this we 
need a supporting rule for comparing two 
numbers, and designing this will illustrate 
some other features of PROLOG. Let us 
examine the rule: 

greater(First,Second, Bigger):- First 

> Second, 
Bigger is First. 
greater(First,Second, Bigger):- Bigger 

is Second. 

As we saw in previous examples, a rule 
involves trying to match conditional 
goals. In this case, to get a match if we 
type in a question, say: 

?-greater(7, 3, Bigger). 

PROLOG will match First with 7 and 
Second with 3 . To get a match for Bigger , 
it will try to match the conditional goals in 
the body of the rule following the .■-sym- 
bol. In this case, since First (7) is greater 
than Second (3), it is able to match the 
goal First Second and decides that First is 
Bigger. The output will be: 

Bigger = 7. 

To see how the second goal of the rule is 
used, let us analyze what happens if wc 
ask: 



lives_at (smith, 11 l_elm_st, anytown). 

lives_at (adams,3300_elfreths_alley, Philadelphia). 

lives_at (fonda,10_jsome__ave,los__angeles). 

lives_at (reagan,1600_pennsylvania_ave, Washington). 

lives_at ( vanburen , 2 12_loop_way , Chicago) . 

lives_at (kennedy,2010_presedential_blvd, boston). 

and: 

has_computer (smith, applell). 

has_computer (fonda, ibm_pc). 

has_computer (reagan, ibra__pc). 

has__computer (vanburen, applell). 

has_coraputer ( kennedy, applell), 

has_computer (adams, applell) . 

Listing 2. 
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?-greater(4, 9, Bigger) 

Arguing as before, we sec that First and 
Second in the head of the rule would be 
matched with 4 and 9, respectively. But 
the goal First > Second does not succeed. 
Since the first rule fails, the alternative 
goal. Bigger is Second is satisfied and the 
result: 

Bigger = 9 

is output. 

To summarize, this pair of rules can be 
expressed in a free translation as: if 
First > Second, then give Bigger the value 
of First, else give Bigger the value of Sec- 



and . We can see that this construct is anal- 
ogous to the IF. . . ELSE of other lan- 
guages. 

We can now use this rule for selecting 
the greater of two numbers in a recursive 
definition for finding the largest number 
in a list of numbers. But first it should be 
noted that the representation of a list of 
items in PROLOG is by enclosing them in 
brackets with the items separated by 
commas— for example, (he list of five let- 
ters, a through e . would be represented as 
[a,b,c,d,e] . 

Second, PROLOG provides a notation 
distinguishing the first element of the list 
or head of the list from the rest of the list 
or tail, as follows: [Head \ Tail]. 

In this notation. Head = a and Tail = 
fb.C.d.e]. In other words, the head is the 
first clement of the list, while the tail is a 
list consisting of all elements except the 
first. Head and Tail can, of course, be 
replaced with any variable names we 
prefer. 

Now let us consider the recursive pro- 
gram for finding the largest number in a 



list. It consists of a pair of rules: 

largest([Only],Only). 
largest([First | Rest], Biggest) :- 
largesr(Rest,Y), 
greater) First, Y, Biggest). 

What happens if we ask a question: 

?-largest([l 9], Result). 

We see that PROLOG will be able to 
match the question with largest 
([Onlyj.Only) by identifying 19 with Only 
and Result with Only and so will output: 

Result=19 

But suppose we ask the question : 

?-largest([3,6,7,l 1,4,2], Result) 

Since PROLOG searches the data base 
from top to bottom, it will try the first rule 
with largest but will be unable to find a 
match because the rule has a list with a 
single element, Only, whereas the ques- 
tion has a list with six numbers in it. So 
PROLOG will now look for any other fact 



owns( Person , CoraputerType , City ) : - 

lives_at (Person, Somewhere, City), 
has_computer (Person, CoraputerType) . 



Listing 3. 

reverse of (a,b,c,d, 
reverse of (b,c,d,e) 
which is 

reverse of (c,d,e) 
which is 

reverse of (d,e) followed by c 

which is 

reverse of (e) followed by d 

which is 

reverse of () followed by e 
which is 



I 

Listing 4. 



followed by a 
followed by b 






PROGRAMMER'S UTILITIES 
especially for Turbo Pascal on 
IBM PC/XT/AT and compatibles 

MORE POWERFUL THAN UNIX UTILITIES!!! 

Whether you are a 

■ Student -- Hobbyist •• Professions! Software Developer -• 

THESE UTILITIES WILL IMPROVE YOUR 

PROGRAMMING PRODUCTIVITY'!' 

These Powerful, Ready-lo-.se programs fully support Turbo 

Pascal versions 2.0 and 30. and MSDOS 2-X and 30. Here's 

what you gel: 

Pretty Printer 

Standardize capitalization, indentation, and spacing ol 
source code Dont waste your own time' Several adiustable 
parameters lo suil your tastes (works with any standard 
Pascal source! 

Program Structure Analyzer 

Find subtle problems the compiler doesn't: uninitialized and 
unused variables, modified value parameters, "sneaky ' 
variable modification, redefined standard identifiers. Also 
generates a complete variable cross reference and a pro- 
gram hierarchy diagram. Interactive or write to file (works 
with any standard Pascal source) 

Execution Timer 

Obtain a summary of time spent in each procedure and 
function of your program, accurate to within 200 micro- 
seconds. Also counts number of calls to each subprogram 
Fully automatic 

Execution Profiler 

Obtain a graphic prafile of where your program spends its 
time. Interactive, easy-to-use Identity weak code at the in- 
struction level. (Proliler and Timer for Turbo Pascal Source 
code only.) 

Command Repeater 

Go beyond MSDOS batch files to combine a powerful text 
parser with general-purpose command execution capability 
Use to copy, print or delete across subdirectories, "make" 
programs and more. 

Pattern Replacer 

Find and REPLACE versatile regular expression patterns in 
any test file. Supports nesting, alternation, tagged words 
and more. Over a dozen programmer's applications 
included 

Difference Finder 

Find ditlerences between two text tiles, and optionally create 
an EDLIN script which rebuilds one Irom the other 
Disregard white space, case, arbitrary characters and Pascal 
comments il desired. 

Super Directory 

Replace PCD0S DIR command with extended pattern 
matching, sort capability, hidden file display, date filtering;. 
and more. 

File Finder 

Locale files anywhere m the subdirectory tree and access 
them with a single Keystroke Display the subdirectory tree 
graphically. 

AVAILABLE IN SOURCE 
AND EXECUTABLE FORMAT 

Executable: S55 COMPLETE including tax and shipping 
Compiled and ready lo run. includes user manual, relerence 
card and one 5V*" DSDD disk Ideal lor programmers not 
using Turbo. 

Source: S95 COMPLETE including tax and shipping. In- 
eludes all of the above, and two additional DSDD disks. 
Disks include complete Turbo Pascal source code, detailed 
programmer's manual (on disk] and several bonus utilities. 
Requires Turbo Pascal 2 or 3.0 

Requirements; MSDOS 2.X or 30. 192K RAM - programs 
run in less RAM with reduced capacity. Two drives or hard 
disk recommended. 

TO ORDER: 

VISA/MasterCard orders, call 7 days toll-free 1-800-538-8157 
x830. In Calilornia. call 1-8OO-672-3470 »830 any day. 
Or mail check/money order lo: 

TurboPnwer Software 

478 W. Hamilton Ave., Suite 196 

Campbell, CA 95003 
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or rule with which a match can be found. 

When it tries the second rule for largest 
it will match 3 with First and {6, 7,1 1 ,4,2] 
with Rest . This will lead it to try to satisfy 
the goal largest([6,7,ll, 4,2 7,1? in the 
body of the rule. To satisfy this, once 
again it has to use the second rule, which 
leads it lo try to satisfy, largest 
(17,1 1,4.2], Y) . . . until it reaches a 
stage where it has to satisfy largest ({2}, Y) . 

At this stage we see that PROLOG can 
use the first rule and identify Y with 2. It 
tried the goal largest (f 2], Y) when it tried 
to satisfy the head goal, largest 
(14.2], Biggest) , at which stage it 



took 4 to be First . So it has now to go on 
to try to satisfy the second goal, 
greater (4, 2, Biggest) , which it does, and 
to extract 4 as Biggest because of the oper- 
ation of the rule for greater, which we 
analyzed earlier. 

But the goal large st ({4, 2], Y) itself arose 
as the body goal when earl ier trying to 
satisfy the head goal,, largest 
(/1 1 ,4,2], Biggest) . so we sec that 
the 4 has to be compared with the 1 1 . 
Working backward this way, the 1 1 
extracted by comparing 4 with 1 1 will in 
turn be compared with 7, until finally it 
outputs: 



ARE YOU TRYING 
TO COMMUNICATE ? 



C programs can communicate with the world now through the power of 
The Greenleaf Coram Library. Now from the people who brought you The 
Greenleaf Functions General Library for C, comes this rich interrupt driven, 
ring-buffered asynchronous communications capability. 

Over 100 functions in C and assembler to facilitate communications at up to 
9600 baud. Up to eight ports at a time. ASCII or XMODEM. X-On/X-Off too. 
Hayes compatible modems controlled here. Safe too, bet you can't exit your 
application with interrupts hot. Major applications around the world base 
their communicating applications on The Greenleaf Comm Library. Stop just 
trying and start really communicating. Get your copy of The Greenleaf Comm 
Library today. For all major C compilers, all models, all versions. For the 
IBM PC and just about any machine with MSDOS and an 8086. Comes with 
source code, extensive examples, demo programs, featuring C-Termlnal, 
reference card and newsletter. No royalty. $185 

Other Products: The Greenleaf Functions General Library, over 220 
functions for total control of the IBM PC, with source. $185 for the compilers 
listed below. (See ordering instructions below). 




Specify compUer when ordering: Lattice, Microsoft, Computer Innovations, 
Mark Williams, or DeSmet. AJd J7.00 for UPS Second Day Air (or tJ.OO for 
ground). TeXiS residents add sales tax. Mastercard. VISA, check, or P.O. 
In stock, shipped same day. 



For Information: 

214/446-8641 



QGeneral Libraries 


$185 


□ Comm Library 


$185 


□ CI 186 Compiler 


$349 


□ Lattice C 


$395 


□ Mark Williams 


$475 




GREENLEAF 
SOFTWARE e 



PRICES ARE SUBJECT TO 
CHANGE WITHOUT NOTICE. 



2101 HICKORY DR. 
CARROLLTON, TX 75006 



Result = 11 

A convenient way of visualizing this 
recursive process is to think that the pro- 
gram first identifies 3 with First , puts it 
away somewhere, and then proceeds to 
deal with largest(l6,ll,7,4,2j,Y) . But this 
in turn requires it to put 6 away some- 
where and deal with the rest of the list. 

So we may think of the 3,6, ... as 
being successively stacked one on top of 
the other so that the program can later 
take them off the stack in reverse order for 
using them in the comparisons required in 
satisfying the second goal of 
greater(4,2,Biggest) , which leads to 
greater(4,l 1 .Biggest) , which leads to 
greater(l 1 ,7, Biggest) , which leads to 
greaterfl 1,6, Biggest) . which finally leads 
to greater(l 1,3, Biggest) . 

Writing expert systems 

This article has attempted to highlight 
some of the features of PROLOG and in 
particular emphasize its declarative or 
assertional way of writing programs as 
contrasted with the procedural methods 
that characterize other high-level lan- 
guages. The declarative aspect of PRO- 
LOG makes the language a really handy 
tool in writing expert systems programs. 

Expert systems are programs that emu- 
late the working of a human expert. The 
approach that has been found most useful 
is to make a distinction between the 
knowledge base used by the expert and the 
inference program for drawing conclu- 
sions using the store of knowledge. 

PROLOG lends itself ideally to storing 
the relevant knowledge in the form of 
facts and rules and then using the PRO- 
LOG interpreter to draw conclusions. 
Space considerations prevent enlarging on 
this use of PROLOG with examples. But 
depending on reader interest as communi- 
cated to the editor, wc hope to have an 
opportunity in a subsequent article to 
illustrate the use of PROLOG for building 
expert systems. M 
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TURBO EDITASM 



Introducing Ihe first co-resident editor assembler tor the IBM PC family. 
TURBO EDITASM (TASM) is significant^ faster and easier to use than the IBM 
Macro-Assembler fMASM) Whether you are new to assembly language and want 
to quickly write a small assembly language routine, or are an experienced MASM 
user tired ol waiting months to assemble large files. TURBO EDITASM will bring 
the excitement back to assembly language 



TURBO EDITASM IS MUCH FASTER: 

• How fast is TASM? The graph below shows relative assembly times for a 48K 
source tile. For large files like this we blow MASM's doors off at 3 times their 
speed. For smaller 8K files we positively vaporize them at 6 times their speed. 

TASM (IIQsec.) 
MASM (340 sec I 

• TURBO EDITASM is faster for the following reasons (1J Written entirely in 
assembly language (unlike MASM} (2) Editor, assembler and source fite always in 
memory so you can go instantly from editing to assembling and back. (3) Elimi- 
nates the time needed to LINK programs. Executable COM files can be created 
directly. (Also creates OBJ fifes compatible with the IBM linker). 

TURBO EDITASM IS EASIER TO USE: 
TASM includes many other features to make your programming simpler 

• Listings are sent directly to screen or printer Assemblies can be single stepped 
and examined withoul having to leave the editor 

• Access the built-in cross reference utility from the editor 

• Full support of 186 and 286 [real mode) instructions. 

• Both Microsoft and 8087 floating point formats are supported 8087 and 287 
instructions supported directly without macros tar taster assembly. 

• Calculator mode: Do math in any radix even using symbols from the symbol table 

• Direct to memory assembly feature lets you test execute your code from editor. - 

• Coming soon; A coordinated symbolic debugger. 

COMPATIBILITY: TASM is source code compatible wuh MASM and supports 
macros, records and structures 



Introductory Price $49 
With .OBJ Capability $99 

Speedware™ 



Include $5.00 shipping and 

handling. California residents 

add 6% Sales Tax. 

Dealer Inquires welcome 

91G-988-7426 

118 Buck Circle, Box C 

Sacramento. CA 95630 



McFO$on trademarks of IBM Coip . 



Microsoft Com 




LPA PROLOG Language Interpreter 4.0 - MS-DOS S395.00 

LPA Sigma-PROLOG UNIX Version - 63,000 S695.00 

LPA Sigma-PROLOG UNIX Version - VAX SI 500.00 

LPA PROLOG Language Interpreter Documentation 45.00 

APES Augmented PROLOG — MS-DOS $395.00 
APES for UNIX Systems S695.00/S 1500.00 

APES Documentation 10.00 

Pkg. LPA PROLOG & APES - MS-DOS S650.00 

PROGRAMMING LOGIC SYSTEMS 

31 Crescent Drive 

MiiforrJ, Connecticut 06460 

(203)877-7988 



CP/M "» a Iradomaik ot Di(jteS Research Inc 
MS-DOS Id a '.■■■; stare i: trademark ol '.' id ojoIi Corp 
PC-DOS n a <i-y ak-rc J 1 r;nJejirorfc 0> 'ISM 
UNIX >t a tnosmaik ol Ball Labs 



Educational ftP^fl 
OiacounlsfiviilaDlq 
iPrieaa aubiecl to cMm 
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THE SYMBOLIC SINE QUA NON 
LlSf 



THE fifth generation language 
» R O L O t 



Cybermetrics UNXUSP-86 (tm) Features: 

• 1 Megabyte address space. 

• LAMBDA, NLAMBDA, MACRO with 
displacement. 

• CATCH, THROW, ERRSET, & ERR. 

• SAVE/RESTORE virtual images to/from disk. 

• &OPTIONAL, &REST, and &AUX parameters. 

• Tree-structured object list, functional 
directories. 

• Lisp utilities with source, including pretty- 
printer, structure editor, debugging functions. 

• Works with any text editor through exec 
function. 

• Extensive manual - written in ENGLISH 

• Requires 320K memory and runs under 
MSDOS and PCDOS versions 2.0 and later. 



$49.00 



ADD S3.00 FOR 
SHIPPING & HANDLING 



TECHNICAL 
(408) 725-1344 




Implementing the full Edinburgh Syntax as 
described by Clocksin and Mellish. 

Recognized by Japan as providing unparalleled 
opportunity for artificial intelligence. 

Applications: 

• The highest level of a hierarchial robotic 
control system. 

• Machine recognition of natural language. 

• Expert systems and knowledge engineering. 

Optional: 

• Virtual memory 

• Special libraries 

• Language extensions 

• Large model 

Requires 192K memory and runs under MSDOS 
and PCDOS versions 2.0 and later. 



automata design assoc. 



TECHNICAL 
(215) 646-4694 



educational package 

$29.95 

other versions $50-3500 



1570 ARRAN WAY 

DRESHER, PA 19025 

TO ORDER CALL (215) 355-5400 USE IT FOR 30 DAYS 



VISA 
MASTERCARD 
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Now!... Software with know-how^ 



Unitek Technologies is a leading Artificial 
Intelligence company. Our software starts with 
market-proven conventional applications and 
adds the know-how of expert assistance in 
planning, organization and interpretation. 

Unitek is looking for new technologies {es- 
pecially C, Prolog and expert systems) that will 
enhance our ability to deliver advanced 
products. 



We also want additional, qualified staff. 

• If you would like to do state-of-the-art 
R&D in applied Al, 

• If you are excited by the prospect of making 
Al commercial, 

• or if you have developed a new Al techno- 
logy, we encourage you to contact: 

Dr. Vance Giboney, Unitek Technologies Corporation 

#115-10751 ShellbridgeWay, Richmond, B.C. Canada 

V6X2W8 (604) 276-2429 



unitek 



TECHNOLOGIES CORPORATION 
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DATESTAMPER "has the answers 




When did we 
print that letter? 

Has the mailing 
list been updated? 

Which is the 
latest version? 

DateStamper '' keeps your CP/M computer up-to-date! 

• avoid erasing the wrong file • keep dated tax log of computer use 

♦ back-up files by date and time • simplify disk housekeeping chores 

OPERATION: DateStamper extends CP/M 2.2 to automatically record date and time a file is created, read or 
modified. DateStamper reads the exact time from the real-time clock, if you have one; otherwise, it records the order in 
which you use files. Disks prepared for datesiamping are fully compatible with standard CP/M. 
INSTALLATION: Default (relative-clock} mode is automatic. Configurable for any real-time clock, with pre- 
assembled code supplied for all popular models. Loads automatically at power-on. 

UTILITIES: Enhanced Super Directory • Powerful, all -function DATSWEEP file- management program with date and 
time tagging • Installation and configuration utilities 
PERFORMANCE: Automatic. Efficient. Versatile. Compatible. 

Requires CP M 2.2. Uses less than IK memory. Real-time clock is optional. 
When ordering please specify format n^Hmn^^^H^^^^^^H^Ba^^ 

8" SSSD, Kaypro, Osborne Formats $49 

For other formats (sorry, no 96 TPIl add $5. 

Shipping and handling $3 

California residents add 6% sales tax 

MasterCard and Visa accepted 

Specialized versions of this and other software available for the Kaypm 
CP/M is a registered trademark of Digital Research. Inc. 



Write or call for further information 



[PliTPerfect Systems] 

BOX 1494 • 1DYLLWIID.CA 92349 • 7f4-659 4432 
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PUBLIC DOMAIN SOFTWARE REVIEW 



Screen scroll utilities and a gnu 

By Tim Parker 



This month wc will 
briefly detour 
from the planned 
scheme of things to answer some requests 
sent in by several readers. 

Those who do a lot of listing on (he 
screen with the MS-DOS TYPE command 
or who look al program listings in 
BASIC, for example, are well acquainted 
with the problem of listings zipping past 
on the screen loo quickly, or worse, hav- 
ing the part of the listing that was of inter- 
est disappear off the top of the screen 
before the listing is frozen. Scroll Lock 
and the Control-S. Control-Q methods of 
pausing the display work well, but they 
lack the refinement thai could make 
screen dumps very useful. 

As many of us do screen dumps of doc- 
umentation, listings, or multiple direc- 
tories, it is time to take a look at a few 
programs designed to make life with the 
scrolling screen a little easier. While this 
may not seem like an important issue, it is 
actually a frequently requested item that 
rarely gets mentioned in examinations of 
the public domain libraries. 

Vincent Bly has developed a program 
called Re-View. It is a user-supported 
program available on several sources, 
including PC-S1G vol. 138. A contribu- 
tion of S15 is requested. 

For those who didn't catch my earlier 
remarks on user-supported programs, a 
quick digression. User-supported pro- 
grams are intended for free distribution 
and are usually available through bulletin 
boards, public domain libraries, user 
groups, and other sources. The authors of 
the programs essentially release the pro- 
gram to the public domain but add a rider 
saying they would appreciate a given 
amount of money (usually $15-530) if the 
program is found useful. There is no obli- 
gation to send the requested amount, and 
there is nothing illegal about not doing so. 

The advantages of sending the contribu- 
tion are the support and the ensuing 
updates that are available quickly and 
readily. Also, the programmer will he 
encouraged in many cases to continue 
writing programs and rewriting versions 
of existing programs. This allows pro- 
grams to be distributed widely and gives a 
user a free look at the material. 



The user-support idea eliminates one of 
the major headaches of commercial soft- 
ware: buying a program for several tens 
or hundreds of dollars, only to find it 
doesn't do what the user thought it would. 
Further, the ever-present piracy and ille- 
gal duplication problems are much less 
important when the program is allowed to 
be distributed. True, the author may not 
make as much money with user-supported 
programs as if the program had been 
released in a commercial package, but 
most of the programs released in the user- 
support fashion are not the programs that 
can cost up to several hundred dollars. 

Now for some details about Re- View. 
Re-View gives IBM and compatible 
machines a buffer that holds 75 lines in it. 
As text is scrolled off the top of the dis- 
play, it is loaded into the buffer and can be 
recalled easily. With the buffer and the 
current screen together, this gives a 
100-line "virtual" screen that is fully 
accessible. The lines can be recalled 
either one at a time or a page at a time. 

Re-View requires a color/graphics 
board. It does not work with the IBM 
monochrome display adapter card, but it 
works fine with Compaqs and other com- 
puters that have a dual purpose card. 

Re-View is activated by simply typing 
the program's name. (You may wish to 
include it in an AUTOEXEC.BAT file for 
convenience.) It will create the necessary 
buffer and activate the keys it uses for 
commands. These are Ihe right-hand plus 
and minus keys by the numeric keypad. 
The standard plus and minus keys are 
unchanged. The program is temporarily 
deactivated by using a Control-ALT/ 
Scroll Lock sequence. This will be neces- 
sary whenever the program is resident in 
memory and another program is used 
which also uses the plus or minus keys. 
Re-View also will not work with pro- 
grams that access screen memory directly 
or use pages other than page for the 
screen. 

The plus key scrolls through the screen 
buffer one line at a time toward the top, 
while the minus key scrolls line by line 
toward the bottom. A Shift-plus combina- 
tion goes up by pages (25 lines), while a 
Shift-minus goes down by pages. The 
scrolling is fairly smooth compared to the 
usual color/graphics scroll, but when 
compared to the dual function boards 



available or a Compaq which supports 
both monitors, it seems a bit jerky. 

The saving to the buffer can be toggled 
on or off with a ALT/Scroll Lock combi- 
nation. The status is fed back to the user 
by beeps from the speaker. Two beeps sig- 
nify that the save is activated; one beep 
means it is deactivated. This is useful 
when an introductory or reference section 
is loaded into the buffer and recalled for 
quick referral when needed while scroll- 
ing through the rest of the text. Alterna- 
tively, one text can be stored in the buffer 
and recalled at a later time, or when in 
another program, or while scrolling 
through another. 

Although Re-View is most useful with 
the standard scrolling commands in DOS 
{TYPE. D/R, etc.). it can also be used 
inside other programs and languages, 
such as Microsoft's BASIC, that use a 
screen dump for some functions, such as 
listings. A long listing can be stored in the 
Re-View buffer and skipped through 
when jumps are encountered or variable 
references used. The buffer's contents are 
destroyed when some programs are run, 
though, and SCREEN and WIDTH com- 
mands clear the buffer. 

Rc-Vicw will not work with the DOS 
Version 2.x ANSI. SYS program. This is 
because the ANSI. SYS program docs not 
support the usual routines in ROM for 
scrolling. However, a patching program is 
supplied with Rc-Vicw that will correct 
the problems in the ANSI. SYS file, cre- 
ating a new file called ANSIR.SYS (so the 
original is not destroyed). The new file is 
then called from the CONFIG.SYS file. 

Two other programs are supplied with 
Rc-Vicw. CLA is a program that works 
like DOS's CLS command bul which also 
clears the contents of the virtual screen 
buffer. UP adds the facility to scroll the 
text above the cursor into the buffer. 

Re-View proved to be especially useful 
when disks were being scanned for con- 
tents and the directories saved in the 
buffer for reference. Further, when a long 
document file is examined, the recall fea- 
tures were used instead of having to print 
the file out. In this respect. Re-View 
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would prove very useful for someone who 
does a lot of text processing. 

Those who have used mainframes run- 
ning VM/CMS will be acquainted with 
the command BROWSE. BROWSE lets the 
user scan a file and move through it to the 
top or bottom, left or right, just as if a 
word processor was invoked, but without 
the edit commands. A similar program is 
available on PC-SIG vol. 205. 

When the command BROWSE FILE- 
NAME is entered, the screen is cleared 
and the text is rapidly displayed. The top 
two lines of the screen are reserved by 
BROWSE and are shown in reverse video. 
The file being scanned is named in the 
upper left corner, while a running line and 



column count appear in the upper right 
corner in the format "Line 73 of 156 Col- 
umn 30 of 120". 

The cursor movement keys are used to 
move through the file. The up and down 
arrows move through a page at a time, 
while the left and right arrows move the 
text to the left and right, with some over- 
lap for readability. The Home key returns 
to the top left of the file, while the End 
key goes to the bottom left. 

The BROWSE function can be exited 
using the ESC key. BROWSE is useful in 
that it is fast and allows movement any- 
where in the document or program listing 
being examined. Although it cannot oper- 
ate over another program like Re-View, it 
is useful in its own right and will proba- 
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The Best Value 
In C Programming Tools 



The edit-compile-link-test-debug cycle that takes tens of minutes with 
compilers and linkers is only seconds with the Instant-C interpreter, Yet it 
runs your programs 50 to 500 times faster than conventional C inter- 
preters! You get the best of both compilers and interpreters. Only Instant- 
C Is a complete, integrated environment for creating, .testing, and running 
your programs. 

Instant-C gives you all of these proven capabilities in one tightly inte- 
grated package: 

interpreter— Instant-C runs your programs faster than some compilers; 
has direct execution; full K&R 

compiler— Instant-C can make stand-alone programs 

full-screen language editor— shows syntax errors with cursor set to 
trouble spot 

C source debugger— single-step, breakpoints, stack trace, more 

run-time checker— validates pointer refs, array bounds, more 

C source formatter— save editing time, find logical flaws 

standard library with source— for best portability 

linker— work with multiple source modules 

Lint— extensive compile-time validation 

The cheapest available examples of these tools would cost $800 (and 
they don't even work together). You could spend close to $3000 to get the 
best product of each kind, but you'd have ten ttmes the complexity, filling 
megabytes of disk, Instant-C is faster; it performs these functions 
automatically. Instant-C is far more than the sum of its parts. 

Instant-C is all of these capabilities in one package, fits on a single floppy 
disk, is full K&R, works on IBM PC's, compatibles, and others under DOS 
or CP/M-86, It costs only $495. 

Instant-C is the best value in C programming tools. Guaranteed, or your 
money back for any reason in first 31 days. 
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bly replace the DOS LIST command for 
many people once they have tried it. 

Another program that acts like Re- 
View but adds other features is available 
on PC-SIG vol. 198 under the name L4, 
Written by Vernon Buerg. it runs only on 
DOS 2.x and will not use ANSI. SYS. 

L4 is invoked exactly like LIST, but 
allows the user to issue a number of posi- 
tioning commands. These are all relative 
to the cursor's current position and will 
affect the block of text in memory. This is 
variable depending on the amount of free 
memory in the machine, to a maximum of 
64K. 

The name of the file is displayed in the 
top left of the screen. The bottom line is 
reserved for commands, and a quick com- 
mand index appears in the lower right cor- 
ner. The file is displayed in half intensity. 

Commands can be issued by cither let- 
ters or control keys. Files arc scanned 
with the normal arrow keys: up and down 
arrows move up or down one line, while 
the left and right arrows move 20 columns 
to the left or right. Alternatively, the letter 
keys N (for next) and P (for previous) 
move one line up or down, while the L 
(left) and R (right) keys move 20 columns 
to the left or right, respectively. 

Paging through a document is done 
with the PgUp and PgDn control keys or 
with the D and U keys. Striking the 
RETURN key advances you to the next 
page. The Home key (or T. for top) moves 
you to the start of the file, and the End key 
(or B. for bottom) moves you to the end. 
The ESC key exits, as docs cither Q (quit) 
orX (exit). Striking the PI, H, or? keys 
will reveal the command list. 

L4 also has a text search facility, 
which is not found in any of the pre- 
viously mentioned programs. A character 
string can be searched for by issuing the 
slash (/) command, followed by the text to 
be located. The maximum text length is 
32 characters. The string to be located is 
then displayed on the command line and 
the text in the memory block is scanned . If 
a match is found, the line blinks. If no 
match is found, an error message is 
issued . To scan another block of memory, 
the PgUp or PgDn command must be used 
to load new text into the memory block 
and the F3 key used to reissue the scan 
command . F3 is also used to locate the 
next occurrence of a match in the current 
memory block, if required. 

A few other commands that move 
within the memory block are also pro- 
vided. These commands also move within 
the entire text when the find function is 
used. Control-Home restarts from the 
current memory block, while Control- 
PgUp goes to the start of the file. Control- 
PgDn skips to the end of the file, and 
Control-left arrow resets the scrolling to 
column one. The find facility is exited 
with the FlOkey. 

L4 takes longer to load than cither of 
the other two programs mentioned in this 
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article, but it has the text find facility, if it 
is required. 

Of the three TYPE replacements, one is 
probably of greater use to a programmer 
or writer, while another works well for a 
casual DOS user. Experimentation ulti- 
mately determines which is best, if indeed 
a TYPE replacement is deemed necessary. 

Although a gnu is 
defined in the 
dictionary as 
"an African antelope with an ox-like head 
and a long tail" or a "wildebeest," the 
GNU in this month's column has nothing 
to do with Africa. The "GNU Project" 
has achieved something of a cult status in 
the computer world. Many people have 
heard about it but few really know what it 
is and even fewer have up-to-date infor- 
mation. The head of the project, Richard 
Stallman. has recently tried to rectify this 
problem by placing updates on services 
such as CompuServe, bulletin boards, and 
in some magazines. 

GNU is an attempt to create a free ver- 
sion of UNIX. Its name stands for 
"GNU's Not UNIX," which is an excel- 
lent example of a recursive name if ever 
there was one! The intention is to create a 
complete system that is UNIX compatible 
in every sense but which lacks the exor- 
bitant costs associated with UNIX. If 
eventually completed, GNU will be dis- 
tributed free of charge and modifications 
and redistribution will be allowed, but no 
one will be able to charge for GNU or a 
modified version. 

To date. Stallman reports that a por- 
table implementation of both C and Pascal 
compilers are completed. An EMACS- 
like text editor, a yacc-compatibie parser 
generator, a linker, and 30 to 40 utilities 
are ready. The crucial command inter- 
preter, or shell, is supposedly near com- 
pletion, with the kernel and debugger tar- 
geted for distribution by the end of this 
year. 

The aims for GNU are high, Although 
the goal is to make it UNIX compatible, 
some changes will be implemented to aid 
in operating convenience. It is intended to 
have both C and LISP as primary lan- 
guages, with longer file names, window- 
ing, and terminal independent display 
support. 

At the moment, GNU is being imple- 
mented on 68000/ 16000-class machines 
with virtual memory. Despite many 
rumors to the contrary, the adaptation to 
other machines such as the IBM-PC is not 
intended to be part of the original GNU 
plan. 

The fate of the GNU project, and 
whether it makes it down to the IBM PC, 
is still to be seen. It is an ambitious 
project, and although the goals arc com- 
mendable, it is likely to generate some 
animosity from the industry. Stallman 



(who wrote the original EMACS editor) 
can be contacted through InterNet, or at 
166 Prospect St., Cambridge, Mass. 
02139. 

Recently crossing 
my desk was a 
press release 
from the New York Amateur Computer 
Club Inc. (NYACC). NYACC, founded in 
1976. is one of the oldest and largest orga- 
nizations of microcomputer users in the 
world. Although well known for its sup- 
port of 8080 and Z80 programs, it has 
recently unveiled its PC/Blue Library of 
IBM PC public domain material. 

For information about this organization 
and the available material, address your 
letters to NYACC, Box 106, Church St. 
Station, New York, N.Y 10008. A catalog 
containing a list of diskette contents, an 
alphabetical index of files, and a list of 
programs grouped into 19 topics is avail- 
able for S5. At last check, there were 1 10 
disks in their library. Most are double- 
sided. Although much of the material is 
contained in bulletin boards and from 
such other sources as PC-SIG (1556 Hal- 
ford Ave., Suite 130, Santa Clara, Calif. 
95051), NYACC disks are inexpensive at 
S7 each and provide a fairly large source 
of public domain material on the east 
coast. 

Two of the programs mentioned in this 
column are available from NYACC: Re- 
View on vol. 52, and L4on vol. 81. (An 
earlier version of L4 can be found on vol. 
68.) 

Many volumes from NYACC match 
those of PC-SIG. especially user- 
supported programs. Having this large, 
trustworthy source of public domain 
material now available on both coasts of 
the United States is a definite benefit for 
all users. All the programs mentioned in 
this column will be available on the 
COMPUTER LANGUAGE Bulletin Board 
Service (BBS) and CompuServe. 

Please continue to submit your com- 
ments, suggestions, and requests for pro- 
grams to me in care of COMPUTER 
LANGUAGE , Reader feedback is the best 
judge of what is wanted out there, and so 
far you*ve been very helpful. Short notes 
also can be left on the BBS , but letters 
really arc the better form, as I can be more 
sure of seeing and responding to each 
one..H" 
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from your C programs 
with 

PC-LINT 



PC— UNT analyzes your C programs (one 
or many modules) and uncovers glitches, 
bugs, quirks and inconsistencies. It will catch 
subtle errors before they catch you. 

PC— UNT resembles the Lint that runs on 
the UNIX O.S. but with more features and 
greater sensitivity to the problems of the 
8086 environment. 

• Full K&R C 

•Supports Multiple Modules— finds incon- 
sistencies between declarations and use 
of functions and data across a set of 
modules comprising a program. 

• Compares function arguments with the 
associated parameters and complains if 
there is a mismatch or too many or too 
few arguments. 

• All warning and information messages 
may be turned on and off globally or 
locally (via command line and comments) 
so that messages can be tailored to your 
programming style. 

• All command line information can be 
furnished indirectly via file(s) to automate 
testing. 

• Use it to check existing programs, pro- 
grams about to be exported or imported, 
as a preliminary to compilation, or prior 
to scaling up to a larger memory model. 

• All one pass with an integrated pre- 
processor so if s very fast. 

• Has numerous flags to support a wide 
variety of C's, memory models, and 
programming styles. 

• Introductory Price: $98.00 MC, VISA 

includes shipping and handling) PA residents add (t% 
sates tax. Outside USA add 110 00. 

• Runs on the IBM PC (or XT, AT or 
compatible) under DOS 2.0 and up, with 
a minimum of 128KB of memory. It will 
use all the memory available. 

3207 Hogarth Lane • Collegeville, PA 19426 
(215)584-4261 

•Trademarks: IBM (IBM Corp .), PC-LINT ICmpe! Soltware}. 
UNKtAT&T) 
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SuperSoft Languages 

When Performance Counts 



A programmer's most 
important software tool is 
the language compiler or 
interpreter he uses. He has 
to depend on it to work 
and work well. 

At SuperSoft, we believe it. 
That's why we offer four 
excellent compilers: 
SuperSoft FORTRAN, 
SuperSoft A, SuperSoft C, 
and SuperSoft BASIC. They 
answer the programmer's 
need for rock solid, 
dependable performance 
on microcomputers. 



SuperSoft 
FORTRAN 

With large code and data. 

SuperSoft FORTRAN version 2.0 
with large code and data space 
is now available under MS DOS 
and PC DOS. It gives you the 
power to compile extremely large 
FORTRAN programs on micros. 
It allows double precision and 
complex numbers, full IEEE float- 
ing point, and a full range of other 
important features for the serious 
FORTRAN programmer. Both 
8087 support and a RATFOR pre- 
processor are optionally available. 
FORTRAN (CP/M-80 & 86, MS 

DOS, PC DOS): $325 
8087 support: $50 RATFOR: $100 



SuperSoft A 

A true Ada* subset 

SuperSoft A is a completely standard 
subset of the Ada language, incor- 
porating approximately 63% of the 
standard Ada syntax and including 
such important features as packages 
and separate compilation. For 
CP/M-80 microcomputers: $300. 

SuperSoft C 

SuperSoft C is a high-powered, full- 
featured C compiler designed for 
serious C applications. It is fast— 
both in compilation and execution, 
and it is packed with more than 200 
library functions (all delivered in 
source code form). SuperSoft C 
produces optimized assembly code, 
and object code can be ROMed. 

SuperSoft C (for CP/M-80, CP/M-86, 
MS DOS, PC DOS): $350 
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SuperSoft 
BASIC 

The SuperSoft BASIC compiler lets 
you get serious with business and 
financial programs. It uses BCD 
math to give you highly accurate 
results for demanding applications. 
SuperSoft BASIC is a true native 
code compiler that is generally 
compatible with Microsoft's BASIC 
interpreter. And an additional 
bonus -no run time license fee is 
required. 

SuperSoft BASIC Compiler (for 
MS DOS, PC DOS, and CP/M-86): 
$300 

Also available for programmers: 

Star-Edit, a full-featured 

programmer's text editor: $225.00 
Disk-Edit, an invaluable 

programmer's disk data editor: 

$100.00 



To order call: 800-762-6629 
In Illinois call 217-359-21 12 



In conjunction with SuperSoft, SuperSoft FORTRAN was developed by Small Systems Services. 
(Jrbana, ll_ a leader in FORTRAN development. 

Japanese Distributor ASR Corporation International. TBL Building. 7th Floor. 1-19-9 Toranomon, 
Minsto-Ku, Tokyo 105. Japan Tel. 03-5025550. Telex 222 5650 ASRTYOJ. 

•Ada is a trademark of the Department of Defense 
PC DOS is a trademark of International Business Machines. 
MS DOS is a trademark of Microsoft. 
CP/M-80 and CP/MS6 are trademarks of Digital Research. Inc. 
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SuperSoft, Inc., 1713 S. Neil St., 
P.O. Box 1628, Champaign, IL 61820 
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EXOTIC LANGUAGE 
OF THE MONTH CLUB 



MRS: An experimental Al system 



n artificial inicl- 
ligence program- 
ming, you 



generally try to reason about time, states, 
or alternatives. There arc programming 
techniques that make this reasoning 
easier. 

If you program in a traditional pro- 
gramming language, you end up building 
your own set of tools to support AI pro- 
gramming. LISP, for example, has 
become popular because it manages data 
structures easily and its programs can 
manipulate other programs. PROLOG has 
gained its status because it is a logic pro- 
gramming language that changes pro- 
gramming from a prescriptive activity to a 
descriptive one. 

However, both of these languages have 
their shortcomings when it comes to AI 
programming. LISP has no tools for logic 
programming, and PROLOG has no effi- 
cient mechanism for closely controlling a 
procedural activity. Without rewriting 
parts of PROLOG, it is difficult for pro- 
grams in PROLOG to reason about their 
own behavior. 

MRS is an experimental logic program- 
ming system written in LISP by the Stan- 
ford University Heuristic Programming 
Project. The most significant difference 
between MRS and PROLOG is MRS's 
ability to observe and control its own 
activity. 

MRS provides tools to manipulate 
ineta-level information. With these tools, 
representations, inference methods, and 
search strategies can be switched. A LISP 
function also can be attached to a predi- 
cate to increase flexibility and efficiency 
as needed. This ability to control the 
meta-levcl structures of a problem makes 
MRS a useful tool for AI programming. 

Syntax. MRS uses a prefix notation. 
This notation is inherited from the LISP in 
which MRS is written. In MRS, a set of 
primative symbols is used to represent 
things and facts about things. An object 
can be almost anything: Fred, car, hobbit. 
Relations describe the relationship 
between objects and are used to state 



By John Sechrest and NickFIa 

facts. For example, the line: 

(Uncle Bilbo Frodo) 

can represent the statement that Bilbo is 
Frodo's uncle. Some of the symbols have 
predefined meanings, such as logical 
operators. All statements are collections 
of terms in a prefix notation. 

All logic systems are merely syntactic 
manipulation systems. The semantics of a 
statement arc independent of the syntax. 
As long as the statements are used consis- 
tently, the semantics of the statements will 
be maintained. Many bugs occur because 
people assume some semantic component 
to a statement about which MRS has no 
information and therefore no ability to 
reason about it. 

Logical operators. A set of logical 
operators (and, or, not, if) is built into 
MRS. These operators allow the combina- 
tion of simple facts to create more com- 
plex facts: 

(and (hungry Bilbo) (tired Bilbo)) 
(if (tired Bilbo} (sleepy Bilbo)) 

These operators work in the obvious way: 
anil succeeds if all of its subclauses suc- 
ceed, or succeeds if any of its subclauses 
succeed, and not succeeds when the sub- 
clause doesn't. 

//is the equivalent of the PROLOG 
implies. In PROLOG you might write: 

P:-Q. (Pis implied by Q) 

In MRS you would say: 

(ifQP) 

Variables. If you wanted lo refer to some 
undetermined object instead of specific 
objects, you would use a variable to refer 
to the object. There are two types of vari- 
ables in MRS: base-level and meta-levcl. 
Base-level variables begin with a S and are 
used to refer to objects. Meta-levcl vari- 
ables begin with an & and are used to 
refer to statements. 

Now you can make statements like: 

(if (wear magic-ring $x) (invisible Sx)) 
(if (orc$x) (ugly $x)) 
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Note that if you just say {ugly $x), $x will 
match all objects in the whole world, in 
other words, "All things are ugly." To 
limit the scope of a statement, you must 
use an (/clause. 

Data base. MRS also provides func- 
tions lo add and delete facts from its data 
base. To store a fact in the MRS data base, 
use assert : 

(assert '(fat Bilbo)) 

Notice the single-quotation mark charac- 
ter. Assert is a LISP function that takes 
LISP variables as arguments. If you are 
putting a constant into the data base, you 
must quote it to make it a literal. Unassert 
will remove a fact from the data base. 
Both assert and wnassert can do additional 
inferencing when storing a fact. 

The data base can be looked at two ways. 
You can look for items either stored in the 
data base or implied by items in the data 
base. If, for example, you say: 

(assert '(age Bilbo 111)) 
(lookup '(age Bilbo $x)) 

MRS will return: 

((l$x|.in)(t.t)) 

This is a binding list describing the bind- 
ings of the variables. If you want to find 
an item implied by the data base rather 
than look into the data base for items 
stored there, you would use truep . Truep 
will do backward inferencing through the 
data base to find if a fact is implied by the 
database. 

Instead of looking at binding lists in all 
of the examples, let's define a function to 
print the lists in readable form. A LISP 
function called output prints a fact from 
the data base based on a template that you 
provide. Listing 1 shows some definitions 
that make function output look more 
reasonable. 

If you say: 

(find '(age bilbo Sx)) 
MRS will return: 
Bilbo is 111 years old 
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instead of 

{( I Sx| . ni)(t.O) 

Truep also searches for the implications of 
a data base. If you look at the following 
set of statements, you can see that the fact 
that Bilbo is happy is not in the data base 
but is implied by it. 

(assert '(if (hobbit $x) (happy $x)) 

(assert '(hobbit Bilbo)) 

(lookup '(happy $x)) ; this will return 

nil 
(find '(happy $x)) 
Bilbo is happy. 

Default inferencing. Most programs 
written in a logic language may not need 
all of the fancy facilities MRS provides. 
The default state for MRS is backward 

inferencing. Switches add forward infer- 
encing, justification, caching, and agenda 
processing. In the default state, these are 
turned off because each adds to the over- 
head of the system. 

Assert does forward inferencing, while 
truep does backward inferencing. Let me 
illustrate the difference. (Note that chang- 
ing the inference method will not alter the 
answer but will alter the amount of work 
needed to find the answer. Whether the 
alteration is good or bad depends on the 
structure of the rules.) We can turn on for- 
ward inferencing for a set of statements: 

(assert '(toassert (&x) fc)) 

for forward inferencing with the follow- 
ing rules: 

(assert 'Jif (ore $x ) (ugly $x])) 
(assert '(ore ragashak}) 

When you assert (ore ragashak) then (ugly 
ragashak) will be stored in the data base. 
Then the process of asking if ragashak is 
ugly is just a lookup. In other words, (ugly 
ragashak) is already in the data base. 

If the forward inferencing on ore was 
not turned on, inferring the answer would 
take longer. When asked if ragashak is 
ugly [(find '(ugly ragashak))], the back- 
ward inferencing procedure looks for 
(ugh ragashak) . When this fails, it looks 
for "rules like (if(. . . ) (ugly ) . MRS will 



find the rule (if (ore $x) (ugly $x)) and sub- 
stitute ragashak for Sx . It vv ill then look 
for fore ragashak) and will succeed. 

Rule structure determines which type 
of inferencing is more efficient. If the 
rules are forward branching, then back- 
ward inferencing is more efficient. If they 
are backward branching, then forward 
inferencing is more efficient. 

Although I defined forward inferencing 
with (toassert (&x)fc) , I could just as eas- 
ily have said (toassert (ore &x)fe) . This 
procedure causes only facts with the form 
(ore &jc) to be forward-inferenced. All 
others will continue to be backward- 
inferenced. Note that if you use $x instead 
of &x , MRS will match only statements of 
the literal form (ore $.x) . It will not find a 
statement of the form (ore $y) . That is the 
purpose of the meta-lcvcl variable: to 
allow you to reference statements that 
contain base-level variables. 

The ability to specify the types of state- 
ments you do forward inferencing on 
allows you to tailor inferencing to the 
data. Suppose, for example, you have the 
following rules: 

(assert '(if (ore $x ) (ugly $x))) 
(assert '(if (ore Sx ] (mean $x))) 
(assert '(if (ore $x ) (big Sx))} 
(assert '(if (hobbit $x) (niceSx))) 
(assert '(if (dwarf $x } (nice Sx))) 
(assert '(if (elf $x ) (nice $x)}) 
(assert '(ore ragashak)) 
(assert '(hobbit bilbo)) 

If you look closely, you will notice that 
rules about ores are forward branching. 
The rules about things that are nice are 
backward branching. No matter what type 
of inferencing you choose, you still get 
the same answer. However, for some of 
the rules it is more efficient to do forward 
inferencing instead of backward infer- 
encing. To find out (ugly ragashak), you 
don't care if he is big and mean, so you 
want to do backward inferencing. To find 
out (nice bilbo), you don't care if (nice 
dwalin) , so forward inferencing on hobbit 
will be more efficient. 

As you can see, both inferencing meth- 
ods will work, but one will take longer 
than the other. By using information about 
the structure of your data, you can make 
the inferencing more efficient. 

Basic AI tools. As I stated earlier, jus- 
tification, caching, and search control 
normally are turned off in MRS. All of 
these add overhead in time and space. But 




you should alter how the defaults are set if 
you need to follow the reasoning for a 
problem, if you know that a specific type 
of inference is going to be done repeat- 
edly, or if you have a problem with a 
structure that is inappropriate for depth- 
first searching. 

Justification. Using the previously 
cited rules, we can show how the reason- 
ing is done. We can turn on justification 
by saying: 

(setq justify 'justifications) 

Then when we say (find '(ugly $x)) all of 
the reasons that lead to this conclusion are 
stored into the justification theory. If we 
say: 

(why '(ugly rogashak)) 

MRS will respond with: 

p274: (ugly ragashak) by be 
p272: (ore ragashak) 
p273: (if (ore $x) (ugly $x)) 

giving you all of the work that it went 
through. p272: is a reference to where the 
fact is stored. 

Caching. Using the previously cited 
rules, if you say (lookup '(ugly $x)) it will 
return nil. On the other hand, if you say 
truep a binding list will be returned. Even 
after truep has returned a binding, lookup 
will not find a reference. This is because 
the facts inferred in the process of infer- 
ring a statement are not saved. If every 
inference were saved, you would soon run 
out of space. But if you know that some 
inference will be used frequently, you can 
say: 

(setq cache 'cache) 

and all of the inferred facts will be stored 
in a theory called cache. Theories are just 
collections of facts stored under a name. 
You can switch or empty theories. This 
gives you control of the facts that are 
stored in the data base. Just think of them 
as buckets that facts are put into. You can 
remove all of the facts from a theory by 
typing (empty 'cache) . 

Search control. Since many reasoning 
tasks are done in very large spaces, you 
will need to manage not only the memory 
usage (with caching) but the time as well. 
Search control can reduce the amount of 
work a program may need to do. Both the 
base- and mcta-level interpreters work by 
taking tasks from an agenda and executing 
them. The preferred command allows you 
to order the items on the agenda. Since 
this ability adds more overhead, the 
ordering feature is normally disabled. 
You can turn it on with (setq preferred t) . 

After the preferred switch is set, you 
can make statements like the one 
presented in Listing 2 . But this procedure 
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is not always as straightforward as one 
might like. The preferred statement is a 
message to the meta-level interpreter to 
prefer inferring on ugly before inferring 
on mean. This can be used to implement 
forms of searching, such as breadth-first 
searching. 

Procedural attachment. Sometimes 
you will need access to more information 
or flexibility than is available inside MRS. 
You can access the underlying LISP sys- 
tem by using procedural attachment. The 
LISP system gives you access to the oper- 
ating system calls and a faster language 
for computation, if the default structure of 
MRS makes a computation difficult or 
inefficient, you can attach a LISP pro- 
cedure to do the work instead. 

While procedural attachment gives you 
efficiency, it also removes MRS's ability 
to know what the procedure is doing. If 
you want MRS to gather information 
about what an attached procedure is 
doing, you must explicitly assert the facts 
you want MRS to know: " 

(assert '(totruep (time &x) get-time)) 
;totruep modifies how truep is 
done. 

(defun get-time (x) (setq x (status 
ctime))) 

(truep '(time ) 

This Truep will return: 
|SunApr21 12:04:001985 | 



The ctime function is an operating sys- 
tem call to the system clock. Reasoning 
systems can get access to the real world 
through this mechanism. 

Because of all the things you might 
want to do with a predicate, several differ- 
ent mechanisms can attach a LISP pro- 
cedure to a MRS predicate. But it is only 
important to know that this is possible. 
Let's see how it can be applied to a spe- 
cific problem, which we'll call the frame 
problem. 



N 



ow that the basic 
programming 
tools available 
within MRS have been introduced, we can 
take a closer look at applying MRS to 
solve some more advanced problems. AI 
methods arc usually search-intensive 
because they are employed to solve prob- 
lems for which no direct algorithmic solu- 
tion is available. The basic paradigm is to 
model problem solving as a controlled 
search through possible solutions. 

Consider the design of a symbolic inte- 
gration problem solver. The problem 
space can be defined as all mathematical 
expressions representable by the 
machine. Search is performed by the 
application of operators that transform 
mathematical expressions according to 
the rules of algebra and integration. The 
goal of the system is to locate in the space 
an expression that does not include an 
integral sign and that was formed by some 
sequence of operators applied to the initial 
problem expression. 

The programmer is faced with two 



(assert '(if (ugly $x) (nasty $x ugly))) 

(assert '(if (mean $x) (nasty $x mean))) 

(assert '(template (nasty &x &y)(&x is nasty because he is &y) 

(setq preferred t) 

(assert '(preferred (bedisp ((ugly &x)).l) 

(bedisp ((mean &y)). &m))) 
(find '(nasty $x $y)) 

ragashak is nasty because he is ugly 



main tasks in design: first, that of knowl- 
edge representation, or how to describe 
the problem to the machine; and second, 
controlling the search so the problem is 
solved in a reasonable amount of time. 

The construction of a problem solver 
involves representing two kinds of knowl- 
edge: state descriptions and operators. 
The two cannot be designated separately 
because the form of one determines the 
other. Basically, the states are described 
by predicates and the operators by rules. 
Search is performed by inference, either 
reasoning back from the goal state to the 
initial state or vice versa. 

To clarify the important issues inherent 
in representation, a scheme for solving 
the standard AI toy problem of hobbits 
and ores is presented. The problem is 
described as follows: 

Two hobbits and two ores find them- 
selves on the north side of a river. They 
have agreed that they want to get to the 
other side. But the hobbits are not sure 
what else the ores have agreed upon. So 
the hobbits want to manage the trip across 
the river in such a way that the number of 
hobbits on one side of the river is never less 
than the number of ores on the same side. 
The only boat available holds just two peo- 
ple at a time. How can everyone get across 
the river without the hobbits getting eaten? 

The similarity of this problem to sym- 
bolic integration can be seen by identi- 
fying the states and operators of this 
domain. A state describes some arrange- 
ment of the hobbits, ores, and boat. The 
program searches the problem space con- 
taining all such arrangements. Rowing the 
boat over the river forms the operators 
that transform states. 

We can imagine how a system would 
solve this problem. Beginning with the 
hobbits and ores on the north side, various 
arrangements in the boat would be tried to 
form new states. At each new state a 
check would be made for termination (for 
example, all people on the south side) and 



Listing 2. 




(goal-state {statedescription}) 

(illegal-state {statedescription} ) 

(possible-operator operator-n {statedescription} {newstatedescription} ) 

(if (or (goal-state {statedescription}) 

(and (unprovable (illegal-state {statedescription})) 

(possible-operator $operator {statedes} {newstatedes} ) 
(hobbits-orcs $ops {newstatedes}))) 
(hobbits-orcs ($operator . $ops) {statedescription} )) 



Listing 3. 
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illegal states (hobbits get eaten). If the 
search is to continue, new operators are 
applied and the process repeated recur- 
sively. We can develop a rule scheme to 
perform this search, as shown in Listing 
3. 

Backward chaining inference can be 
used to solve this problem. The user 
types: 

(truep '(hobbits-orcs Soperators 
{initialstate})) 

The system will return a binding list with 
Soperators bound to a list of suitable 
operators. 

A state describes the location of all the 
hobbits, ores, and the boat in the domain. 
Other information, such as the count of 
hobbits and ores on each side, may be 
included in the description to simplify the 
rules. One way to represent a state is to 
explicitly mention all the individual 
descriptive facts in the rules and 
predicates: 

(hobbits-orcs $operators Ssideboat 

Ssideorcl 
$sidehobbit1 $northhobbitcount . . . ) 

and initially call the problem solver with: 

(hobbits-orcs Soperators north north 
north 2 ) 

The method looks a bit clumsy with this 
problem, but it is quite suitable for very 
simple domains. As domains increase in 
complexity and state descriptions become 
more involved, this approach becomes 
impractical. 

This method has two main disadvan- 
tages. First, the memory requirements 
become excessive during the search 
because of the many copies of the full 
state description stored on the agenda. 
Second, solution time increases because 
of the time spent copying unchanged 
information from one state description to 
another. 

The difficulty with this approach is 
apparent in real world domains such as 
robots whose states are described by thou- 
sands of facts. This problem— the frame 
problem— is well known in AI and occurs 
in all nontrivial domains when a system 
has to reason about changes. 

An elegant solution to this problem was 
proposed in 1970. The basic idea of the 
strips method (named after the robot plan- 
ning system) is to represent all facts 
describing states as individual predicates 
in a global data base and to use lookups to 
access data and assert to make changes. 

In this rule scheme, the state descrip- 
tions are replaced by state variables and 



Logic programming: the art of reasoning 



Before asking the question "What is 
logic programming?" we first must 
ask "What is logic? " 

In terms of programming, logic can 
be t hought of as the process of reason- 
ing, both rightly or wrongly, toward a 
conclusion. To bring this definition 
into focus, let's look at logic in terms 
of the kinds of problems it can solve. 

Syllogisms are types of logical argu- 
ments having two premises and a con- 
clusion. For example, consider the 
following: 

Ail men are tall. 

All tall people wear hats. 



All 



men wear 



hats. 



The first two lines are the premise, 
the last the conclusion. The basic ques- 
tion here is if the premise is true, will 
the conclusion be true? Or, in more 
precise terms, does the conclusion log- 
ically follow from the premise? 

Logic can prove a conclusion based 
on a certain starting premise by show- 
ing that the conclusion logically fol- 
lows the premise. As in mathematics, 
many of the more advanced theories of 
logic are derived in this way from 
base-level postulates. 

Logic, as applied to natural lan- 
guage interpretation, is very useful for 
understanding language. This under- 
standing is essential for certain forms 
of processing, such as language trans- 
lation, and for deriving meaning from 
the written and spoken word. 

These examples of the types of 
problems logic addresses show that it 
is a very powerful tool. To better 
understand how the science of logic 
has progressed to where it is now, let's 
look at where it started. 

History shows Aristotle to be the 
father of logic. In fact, much of 
today's study of logic still consists 
of rules and assumptions made by 
Aristotle and some of his followers. 
Between Aristotle's time and the 
1800s, his work stood without serious 
challenge. This changed with the work 
of two great minds. Augustus De 
Morgan, born in 1806, was a mathe- 
matician and philosopher who delved 
into many aspects of logic and mathe- 
matics. He also was instrumental in 
bringing to attention the work of a 
hitherto unknown school teacher. 
George Boole. Born in the late 1700s. 
Boole's work concentrated on the 
algebraic properties of logic. 

Many of the methods and theories 
put forth by Boole and De Morgan 



stand unchanged to this day. Their 
fields of expertise included mathe- 
matics, logic, and many forms of 
engineering analysis, such as electrical 
circuit analysis. 

Now, you may ask, what does logic 
programming have to do with logic? 
The study of logic may be interesting, 
but why apply it to programming? 
Why take the trouble to change? Pro- 
gramming in logic does not necessarily 
fit into the traditional von Neumann 
computer model— that is, that one 
instruction follows another. 

The answer is that some problems 
can be described very easily using the 
constructs of logic. In logic program- 
ming, the process of specifying how 
the solution should look is almost 
equivalent to writing the program. 

Logic programming brings to the 
computer power to attack problems 
that previously were difficult, if not 
impossible, to understand. From a 
programmer's standpoint, logic can be 
thought of as a system of rules and 
facts. 

Rules and facts take the place of the 
traditional statement used by other 
programming languages. Facts are 
simply statements of constants (for 
example, "Lee is tall"). Rules are tra- 
ditional logical statements (for exam- 
ple "A man is tall if he is thin"). In 
addition, rules can be interpreted in 
two ways: procedurally, as in the von 
Neuman tradition, and semantically. 
For exajnple, the rule "A man is tall if 
he is thin" can be interpeted pro- 
cedurally as "To find a thin man. first 
find a tail one" or semantically as "All 
thin men are tall men." 

In addition to their the ability to use 
logic, some logic programming lan- 
guages allow control over how the 
inference process is executed. These 
languages are sometimes referred to as 
meta-logical, because they can control 
the flow of logic. 

For more information on logic program- 
ming, a good general reference is W.F. 
Clocksin and C.S. Mellish's Program- 
ming in Logic, available from Springer- 
Verlag. 

By William Lee Duncan 



William Lee Duncan is an independent 
UNIX consultant and has just finished a 
year of graduate school at Oregon State 
Univ. He received a B.S. in electrical 
engineering from Oregon State in 1981 and 
was employed with Hewlett-Packard for 
two years. 
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ihc rules extended to look up the relevant 
values. The initial state and termination 
recognition rule presented in the example 
problem can be seen in Listing 4 . 

Changes to the state are achieved by 
asserting new facts into the data base with 
a new state variable and altering the way 
facts are looked up. Consider the effect of 
rowing the boat to the south side with both 
hobbits aboard. The possible-operator 
rule will generate a new slate variable and 
assert the following facts: 

(onside state-! south hobbits Bilbo) 
(onside state- 1 south numberof hobbits 
2) 

(nextstate state-0 state-1 ) 

To look up the state of the world at state- 1 , 
the system performs a search— for exam- 
ple, for the statement (onside slate- 1 south 
countojhobbits$count) . the value 2 will be 
returned directly. But if you want to look 
up (onside state- 1 north numberoforcs 
Scount) . the system will first check state- 
1 and, on finding nil, will use the nextstate 
relationship to find the previous state and 
lookup in state-0. Generally, the search 
will continue until a value is found. 

MRS has many advantages over lan- 
guages such as PROLOG for imple- 
menting systems like this. The lookup 



routines can be implemented as pro- 
cedural attachments as shown in Listine 
5. The method in Listing 5 allows MRS~ 
programs to solve problems in large, 
complex domains where the conventional 
approach is infeasiblc. 

Controlling the search through the 
problem space often is not just preferable 
to allow speedup but can be essential for 
termination. In the example problem, for 
instance, without the ability to control the 
search, the system might have tried to row 
the boat back and forth infinitely with one 
hobbit aboard. 



A 



spectrum of 
methods is avail- 
able for control- 
ling the search. Conventional algorithmic 
solutions have built-in controls and usu- 
ally solve problems in ideal times. Many 
problems, although not algorithmicly 
solvable, allow heuristic knowledge that 
can be applied to select one operator or 
state over another. Where no additional 
knowledge is available, systems revert to 
pure generate and test, with solution times 
greatly increasing. 

One of the major achievements of AI 
research over the last 25 years has been 
the realization of the need for additional 
knowledge to guide searches through 
problem spaces, Specdups in the order of 
magnitudes can be gained by the addition 
of some simple heuristic knowledge. In 
the hobbits and ore problem, tremendous 
spcedups can be achieved by making the 
system prefer the operator that carries two 
people south and only one north over any 



other operator. 

Because of the importance of search 
control, it is surprising that MRS is the 
only logic programming language to 
directly incorporate it. PROLOG solves 
all its problems using a depth-first gener- 
ate and test, with the static ordering of 
clauses providing the only direct control. 

MRS allows the user to impose an 
ordering over the tasks on the agenda. To 
order search by depth, the main problem 
solving clause in the example problem 
(such as (hohhits-orcs ... J) needs an 
additional slot to hold the depth informa- 
tion, which is incremented at each recur- 
sive call. 

Preferred rules can be written to select 
the lowest depth to give breadth-first 
search or to select the greatest value to 
give depth-first search. The numerical 
value in the clause can be computed by an 
evaluation function that refers to the cur- 
rent state giving best-first search. 

If you would like a copy of MRS, it is 
available for S500 ($200 for universities). 
For more information, contact: 

Margaret Timothy 

Symbolics Systems Resources Group 

Stanford University Medical Center 

RoomTB 105 

Stanford. Calif. 94025 H 



John Sechrest has a B. S. in math and com- 
puter science from the Univ. of Illinois at 
Champaign-Urbanu. Formerly employed 
with Hewlett-Packard, he is currently a lab 
coordinator with Oregon State Univ. in 
Corvallis, Ore. 



(onside 


state-0 north ores ragashak) 




(onside 


state-0 north numberoforcs 2) 




(onside 


state-0 south numberoforcs 0) 




(onside 


state-0 north hobbits Bilbo).... 




(if 


(and (onside $state south numberoforcs 2) 






(onside $state south numberofhobbits 


2)) 




(goal $state)) 




(if 


(and (onside $state $anyside numberoforcs $norcs) 




(onside $state $anyside numberofhobbits $nhobbits) 




(> $norcs $nhobbits)) 






(illegal-state $state)) 





Listing 4. 



Nick Flann has an electric and electronic 
engineering degree from Coventry Poly- 
technic in England and is currently work- 
ing on a masters in artificial intelligence at 
Oregon State Univ. 



(tolookup (onside Estate &side Stype &value) strips) 

(defun strips 

(state side type value) 

(or (lookup (onside-g , state ,side ,type .value)) 

(strips (lookupbdg '$nextstate ' ($nextstate $nextstate , state)) 
side type value))) 
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windows, browser, 
inspector. PCDOS $239 



We evaluate, carry every available 
programmers product. Ask for a 
packet describing OVER 20 
PRODUCTS 



C LANGUAGE 



C Terp Interpreter by Gimbel, 
full K&R. .OBJ and ASM interface, 
8087. MSDOS $275 

INSTANT C • Interactive develop- 
ment-Edit. Source Debug, run. 
Edit to Run -3 Sees. MSDOS $445 
"INTRODUCING C" - Interactive 
C to learn fast. 500 page tutorial, 
examples, graphics. PCDOS S 95 
MEGAMAX C - native Macintosh 
has fast compile, tight code, K&R. 
toolkit. .OBJ. DisASM MAC S275 

Wizard C - Lattice C compatible, full 
sys. 1 1 1 syntax, lint included, fast, 
lib. source. MSDOS S450 

BSEasna 

APPLICATION TOOLKIT by Shaw - 
Complete; ISAM. Screen. Overlay 
mgnt, report gen, Strings, String 
math. Source. CPM. MSDOS S475 

COMMUNICATIONS by Greenleaf 
($159) or Software horizons ($139) 
includes Modem7, interrupts, etc. 
Source. Ask for Greenleaf demo. 

C SHARP Realtime Toolkit - well 
supported, thorough, portable, ob- 
jects, state sys. Source MANY $600 

C Index + - full B+Tree, variable 
length fields. Source, no 
royalties. MSDOS S369 

PC'LINT - Small, big model. Batch 
option. Lattice, C86 MSDOS $ 95 



FORTRAN LANGUAGE 



MacFORTRAN - full 77, '66 option, 
toolbox, debugger, 128K or 51 2K, 
ASM-out option MAC $375 

RM/Fortran - Full '77, BIG ARRAYS, 

8087, optimize, backtrace, 

debug. MSDOS $525 

Ask about Microsoft, Supersoft, others. 



OTHER LANGUAGES 



ASSEMBLER - ask about FASM-86 
($95), ED/ASM ($95) - both are 

fast, compatible, or MASM 

($1251, improvements. 

BetterBASIC all RAM, modules, 
structure. BASICA-like PCDOS $185 

SNOBOL4 
patterns. 



-great for strings, 
CPM86, MSDOS $ 85 



SUPPORT PRODUCTS 



BASIC DEVELOPMENT SYSTEM - 
(BDS) for BASICA; Adds Renum, 
crossref. compress. PCDOS $115 

CODESIFTER - Execution PRO- 
FILER. Spot bottlenecks. Symbolic, 
automatic. PCDOS $109 

FASTER C - Lattice users eliminate 
Link slep. Normal 27 seconds. Faster 
C in 13 sec. MSDOS $ 95 

PLINK-86 tor Overlays, most lang., 
segment control. MSDOS S325 

PS MAKE by Unipress - Interactive or 
batch. Full MAKE. MSDOS S129 



"C" LANGUAGE i 



MSDOS C86-8087, reliable 
InstantC- Inter, last, lull 
Lattice C ■ the standard 
Microsoft C 3 - new 
Williams ■ debugger, lasl 
Wizaid C ■ lull, fast 
CPM80 - EcoPlus C - laster . SLR 
BDS C - solid value 
MACINTOSH Hippo II 
Megamax - optimizer, full 
Consulair'S MAC C. toolkit 



OUR 
PRiC: 
call 
445 
call 
279 
call 
■150 
275 
125 
375 
275 
395 



EDITORS Programming! | LANGUAGE LIBRARIES 



OUR 
RUNS ON PRICE 
PCDOS 195 
6680 75 
PCDOS 195 
8680 215 
8085 185 
119 
95 



PCDOS 



Compare, evaluate, consider other Cs 



RUNS ON 

BASCOM-85- Microsoft 8086 279 

CB-86-DHI CPM86 419 

Data Manager-lull source MSDOS 325 

CADSAM-Fu'lBHee. source MSDOS 150 

InfoREPORTER-multifrle PCDOS 115 

Prol Basic-lnler . debug PCDOS 89 

SCREEN SCULPTOR PCDOS 115 

TRUE BASIC -ANSI PCDOS 125 

Ask about ISAM, other addons lor BASIC 

Emm 

ALL PRODUCTS - We carry 700 products 
lorMSDOS.CPM86,CPM80 Mac- 
intosh and key prod ucts lor other 
micros 



BRIEF -intuitive, flexible 
C Screen with source 
Epsilon-likeEMACS 
FINAL WORD-for manuals 
PMATE- powerful 
VEDIT -full, liked 
XTC-rnultrt asking 

iron 

Dig Res-decent MSDDS 525 

Macintosh COBOL -Full MAC 1850 

MBP-Lev II. native, screen MS0OS 885 

Micro Focus Prof -Full PCDOS call 

Microsott-Levll.noroyal MSDOS 500 

Ryan McFailand- portable MSDOS 695 

Ask about program generators. 



GRAPHICS Halo for Turbo Postal MSDOS 95 

GRAPHM ATI C - 3D . FTti . PAS PCDOS 125 

MultiHALO - fast, lull-all lang. PCDOS 220 

File MGNT BTrieve-all lang MSDOS 215 

Clndex - -source, no royal 86 80 369 

CTree -source. no toyal ALL 369 

d8C ISAM by Lattice 8086 229 

dBVISTA- "Network' Structure MSDOS 465 

PHACT-upunderUNIX. addons MSDOS 225 

OTHER: C Utilities by Essential MSDOS 129 

Greenleaf -200- MSDOS 159 

SOFT Horizons- Blocks PCDOS 139 

SCREEN CURSES by Lattice PCO0S 125 

MetaWINDOW- icons, clip PCDOS 139 

PANEL -many lang term MSDOS 249 

PioScreen- windows. source PCDOS 415 

Turbo V • Greenleaf C. fast PCDOS 159 

Windows for C MSDOS 175 



I J»] ill! Mt 1 ! RUNS0 N PRICE 

MSFORTRAN-86-lmpr MSDOS 239 

DRFortran-86-fuH77 8086 249 

PolyFOPJRAN-XREF.Xtract PCDOS 165 



OTHER PRODUCTS 



Call for a catalog, literature, and solid value 

800-421-8006 

THE PROGRAMMER'S SHOP M 

128-1 Rockland Street. Hanover. MA 02339 
Visa Mass 80O-442-8070 or 617-826-7531 MasterCard 8517 



Advanced Trace 86 - Symbolic 


PCDOS 149 


Assemblers Tools -DRI 


8086 159 


Atron Debugger lor Lattice 


PCDOS 395 


C Helper DIFF, xref.more 


8680 135 


C0DESMITH-86- debug 


PCDOS 129 


MacASM- full, fast, tools 


MAC 115 


MBPCobol-86-fast 


6086 865 


MicroPro log-improved 


MSDOS 185 


Micro SubMATH- FORTRAN lull 


B6/80 250 


Microsoft MASM-86 


MSDOS 125 


Multilink-Miltitasking 


PCDOS 265 


PC FORTH -well liked 


MSDOS 219 


Pfinisfi - Prolile by routine 


MSDOS 345 


PFIX-86 DeOugger 


MSDOS 169 


PL1-85 


8086 495 


Poiylibranan- thorough 


MSDOS 95 


PoiyMAKE 


PCDOS 95 


TRACE86 debugger ASM 


MSDOS 115 


ZAPCommunicattons-VTIOO, 




TEK 4010, full xler 


PCDOS 65 



Note All prices su Dject to change without nonce 
Mention this ad Some prices are specials 
Ask about COO and PQt , Alt lormal s available 
UNIX isatrademark of Bell Labs. 
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<8>0<8>0 PRODUCT BINGO <g>0®0 



By Doug Millison 



Each month Product Bingo features the latest in new soft- 
ware and hardware products of interest to COMPUTER 
LANGUAGE readers. Send new product information to 
Doug Millison, Product Bingo, COMPUTER LANGUAGE, 
131 Townsend St., San Francisco, Calif. 94107. 



Thoroughbred BASIC for IBM PC/AT 

Thoroughbred BASIC, a business basic interpreter 
designed for 1 6-bit, multiuser microcomputers, is now avail- 
able from SMC Software Systems for the I BM PC/AT run- 
ning Microsoft's XENIX 3.0 operating system. 

SMC Software Systems, P.O. Box 0600, Basking Ridge, 
N.J. 07920, (201)647-7000. 

CIRCLE 101 ON READER SERVICE CARD 



GetSmarf/C 

Smart/C incorporates Al techniques in a fully integrated 
precompilafion development environment for C. Smart/C 
prices range from $500 for the I BM PC to $ 1 0,000 for VAX 
11/780. 

AGS Computers Inc., 1 1 39 Spruce Dr., Mountainside, 
N.J. 07092, (201)654-4321. 
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MacFORTRAN for guess what? 

MacFORTRAN, an ANSI FORTRAN 77 compiler with 
debugger, was designed for the Macintosh and features full 
access to the Mac toolbox. 

Absoft Corp., 4268 N. Woodward Ave., Royal Oak, 
Minn. 48072, (313)549-7111. 

CIRCLE 106 ON READER SERVICE CARD 



B-tree indexing 

B-Tree Library is available with full documentation, full C 
source, and phone support in most formats for $75. 

Softfocus, I 277 Pallatine Dr., Oakville, Ont., Canada 
L6H 1Z1, (416) 844-2610. 
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Utilities power Turbo Pascal 

Turbo Pascal users can power-up with TurboPower Util- 
ities, priced at $95 for the IBM PC family and compatibles. 
TurboPower Software, 478 W. Hamilton Ave., Ste. 196, 
Campbell, Calif. 95008, (408) 378-3672. 
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Multiwindow, multiuser C 

Interactive C is a multiwindow, multiuser, full-featured C 
language development system for the IBM PC, priced at 
$395. 

IMPACC Associates, P.O. Box 93, Gwynedd Valley, Pa. 
1 9437. 
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True source debugger for C 

Programmers using the Lattice C compiler will be interested 
in C Debugger, priced at $165 plus shipping and handling. 

Micro-Software Developers Inc., 2 1 4 '/z W. Main St., St. 
Charles, 111.60174, (312)377-5151. 
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UNIX-compatible Forth 

u4th brings a portable, standard Forth to the U N IX and 
XENIX world. 

Ubiquitous Systems Inc., 1 3333 Bel-Red Rd. N.E., Belle- 
vue. Wash. 98005, (206) 641-8030. 
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Modula-2 for $80.88 

$80.88 gets you a full-featured Modula-2 programming 
environment for the IBM PC family and compatibles. 

Interface Technologies Corp., 3336 Richmond Ave., Ste. 
200, Houston, Texas 77098, (71 3) 523-8422. 

CIRCLE 1 10 ON READER SERVICE CARD 



CTOS/BTOS version of CLOUT 

Clout, a natural language data base, is now available for 
CTOS/BTOS-based microcomputers. 

Microrim Inc., 3380 146th PI. S.E., Bellevue, Wash. 
98007,(206)641-6619. 
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C program analyzer for MS-DOS 

Pre-C, a new MS-DOS/PC-DOS program analyzer for C 
users, is priced at $395. 

Phoenix Computer Products Corp., 1 4 1 6 Providence 
Highway, Ste. 220, Norwood, Mass. 02062, (617} 
762-5030. 
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HCfi/PASCAL, W1RTH ITS WEIGHT IN C 



PASCAL 



Originally designed by Niklaus Wirth, is now 
available for a wide range of UNIX™ 
processors. HCR/PASCAL conforms closely 
to industry standards, passes all conformance tests in the PASCAL 
Validation Suite. Supports multiple module programs, a dynamic 
string package, and direct random file access. 



Cis the standard language of UNIX, HCR/PASCAL is written in C 
and translates PASCAL into C producing efficient optimized 
code. This approach allows direct interaction with the UNIX 
environment and offers a high degree of portability. 



UNIX 



is a powerful yet flexible operating system environ- 
ment. HCR/PASCAL is available today on a diverse 
range of UNIX hardware: AT&T 3B™ series, the NCR 
Tower,™ DEC PDP-11/VAX,™ and others. HCR has a growing line of 
UNIX software including business applications. We back up all our 
software with full support. To find out how we can put HCR/PASCAL, 
C, and UNIX together for you, call or write: 



Human 
Computing 
Resources 
Corporation 



jiPD 
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10 St. Mary Street. Toronto, Ontario, Canada M4Y 1P9 (416)922-1937 
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SOFTWARE REVIEW 



Knowledge Systems for the IBM PC, Part I 




xpert systems 
technology is one 
i of the fastest 
moving and most widely discussed areas 
of computer software. Strictly speaking, 
an expert system is a finished knowledge 
system application that has been perfected 
until it achieves expert-level performance. 
However, the term is often used in a loose 
way to mean the tools designed specifi- 
cally for developing these applications as 
well as for any and every application thai 
uses this same type of technology. 

Numerous legitimate applications of this 
technology could not be called expert sys- 
tems in the true sense by any stretch of the 
imagination. So it seems much less con- 
fusing to consider expert systems an 
important subclass of a technology that 
could be called knowledge systems or 
knowledge-based software. 

This review will attempt to give you an 
overview of this software system as welt 
as offer a survey of the first major wave of 
knowledge system development tools for 
PCs. This month, in Part I, we will look at 
the following categories of expert sys- 
tems: decision modeling software, lan- 
guage extension packages, example- 
driven decision tree systems, and small 
production system tools. 

Next month, in Part II, we will explore 
rule-oriented mathematical modeling sys- 
tems, intermediate-level systems, and 
advanced systems. The following prod- 
ucts will be reviewed in Part II; Insighl-2 
from Level Five Research Inc., Expert 
Systems International's ES/P-Advisor, 
the TIMM PC from General Research 
Corp., Lotus/Software Arts' TK.'Solver. 
REVEAL from McDonnell-Douglas, 
KES from Knowledge Engineering Sys- 
tem, andTcknowlcdge Inc. 's M.I. 

In terms of knowledge, there are two 
basic types of software applications: those 
that incorporate knowledge to help a user 
better handle problems and those that arc 
primarily efficiency tools to which a user 
must apply his or her own knowledge and 
skill, such as word processors, spread- 
sheets, and programming languages. A 
superb word processor can take much of 
the drudgery out of writing, but a poor 



By Ernie Tello 

writer will still write just as poorly with 
it. With knowledge-based software, the 
idea is that the knowledge built into it can 
and should help the user to perform belter. 

Although expert systems technology is 
a by-product of artificial intelligence 
research, not all knowledge-based soft- 
ware is. Often when a program is 
described as AI, a user or programmer 
who tries it will expect some awe- 
inspiring omniscience to emanate from its 
every movement. But even the best expert 
systems developed so far arc only expert 
in their ability to apply expert knowledge 
to solving certain types of problems. They 
are in no sense a replacement for living, 
breathing experts who can talk to you and 
think about your problems. Let's take a 
brief look at some of the major types of 
knowledge-based systems to sec what they 
are and what they are capable of doing. 

Production systems. Most of the soft- 
ware available for developing expert sys- 
tems is aimed at creating some type of 
rule-based production system. Usually 
such a system will have at least three com- 
ponents: a rule base, an inference engine, 
and a consultation shell. The consultation 
shell is the end-user environment for the 
finished application. 

In a given session, the system will pose 
certain questions to the user. Depending 
upon the answers given, the system is 
directed to a particular outcome where a 
result is displayed. The result may be a 
choice of several alternatives, a diagnosis 
of the cause of trouble, a prediction that 
various events have a certain probability 
of occurring, or something along these 
lines. 

One of the things that production-rule 
systems offer that hard-coded programs 
generally do not is the ability to justify 
their answers and results. This is 
extremely important, because without it a 
user would be expected either to accept 
the results on faith or ignore them. The 
more a user is able to explore the way a 
system arrived at a particular result, the 
more the user is able to learn about the 
problem and the better the user is able to 
make a decision and analyze the results. 

But as important as a justification facil- 
ity is, even more important is the amount 
of detail and flexibility a system provides 
in the final outcome. The whole point is to 



help solve a problem in as expert a manner 
as possible. It is the power of the repre- 
sentation language used to provide the 
rule base that determines the quality of the 
outcome. 

Some important initial questions should 
be asked about the representation 
language: 

■ Are there symbolic variables that allow 
the general statement of rules for whole 
ranges of lookup values? 

» Docs it allow the calculation of numer- 
ical values on the basis of a user's input? 

■ Docs it provide for the entry of facts as 
well as rules? 

■ Does the language provide for OR 
operators between the antecedent condi- 
tions of a rule? 

It seldom takes an expert to tell you 
what you need for your particular situ- 
ation and requirements. But to tell you 
how much you need requires expertise. 
Yet if the representation language has no 
math capability, there is no way such 
expertise can be included in the system. If 
the system can only handle rules about 
constant numbers and not variables, the 
number of rules needed may get astrono- 
mical. Similarly, the presence of OR oper- 
ators for conditions often can keep the 
number of rules down. Otherwise, a new 
rule would have to be entered for each of 
the alternate conditions. The fewer rules a 
production system has to search through, 
the faster it can run. So the number of 
rules an expert system tool is capable of 
handling actually means very little. What 
is more important is how well and how 
easily the tool can be used to create pow- 
erful and compact rules with the system. 

Closely tied to a given representation 
language is the inference engine, which is 
the control center for whatever degree of 
intelligence the production system can 
exhibit. The two main types of inference 
procedures are forward chaining and 
backward chaining. Although it would be 
nice to have a system capable of both, so 
far there are no knowledge engineering 
tools for microcomputers that offer both 
as complementary tools to design single 
knowledge systems. At best, there are 
high-level languages that allow develop- 
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FILE SAVIOR 

is a disk utility you can't afford to 
be without! 

• Makes recovering an erased file easy... 
as long as you haven't written a new File 
on top of it 

• Display and edit any disk sector - in hex. 
Ascii or Ebcdic 

• Search a file or your whole disk for a text 
string 

• IBM PC XT 'AT and true compatibles 

• DOS 1.0 thru 3.1 

• Any DOS-formatted diskette or hard disk 
- up to 33 meg 



49 



95 VA residents 
add 4 r f sales tax 



Technisoft 

1710 Allied Street. Suite 37 

Charlottesville. VA2290 1 

|804 ]979-6464 



EAST SCREEN 

OUTPUT FOR 

TURBO PASCAL 



FASTSCREEN™ 

is a set of inline assembler and Pascal 
procedures for Turbo Pascal users. 

• Display an entire screen or window almost 
instantly 

• Process muki- field input screens that give 
your user full cursor control 

■ Sample program uses Conway's LIFE to 
illustrate use of procedures 

• All source code included 

• Color and monochrome Support 

• IBM PC/XT/AT and true compatibles 

• DOS operating system 
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95 VA residents 
add'ff sales lax 



Technisoft 

1710 Allied Street. Suite 37 

Chariot tesville.V A :290l 

(804)979-6464 

Turbo ?2wt] ii i retimed Iradeiiutk 
uf Borbnd tmejruuonjj 



ers who know what they're doing to 
implement both. Let's take a look al what 
these two types of procedures involve. 

The main requirements for an inference 
engine are: 

■ A way of determining when and where 
to start 

■ A procedure for searching (oward a 
result 

■ A way of determining that a result has 
been found or that no resuls can be found. 

In a backward chaining inference 
engine, the reasoning process begins with 
a conclusion, or Tlic/r part of a rule, which 
is designated as a goal. A very simple sys- 
tem might just pick the conclusion of rule 
1 as the first goal and go on down the list. 
In a more sophisticated system, the 
knowledge engineer designates what the 
goal is to be. and the inference engine 
looks for the rules that have that goal as 
their conclusion. 

Once the goal has been determined, the 
inference procedure attempts to prove 
true those antecedent conditions that 
establish that goal. Often the process will 
stop once one rule has been found where 
all the antecedents that prove the goal are 
true. More sophisticated systems allow 
attributes that permit multiple values. 
Sometimes you might want all the possi- 
ble solutions to a goal— for example, if 
the goal were a way to get 510,000 in 
one day. In this case, the system would 
attempt to find as many values as it could 
for the goal. 

Forward chaining inference engines 
approach the problem in the opposite 
manner. They are bottom-up, or data- 
driven, systems. They begin by trying to 
find antecedents or conditions in the if 
part of rules that are true facts. In this 
case, it is not sufficient to have just point- 
ers to the goal and the current rule: it is 
necessary to have an inventory of known 
facts that is maintained in a list known as 
the working memory. The antecedents of 
rules are compared with the contents of 
the working memory to determine if they 
are true. When all the antecedents of a 
rule compare favorably, the conclusions 
of the rule arc added to the contents of 
the working memory and the process 
continues. 

Decision trees. Two types of software 
packages discussed here directly incorpo- 
rate decision trees: decision modeling 
programs and example-driven, rule 
induction programs. Although 
production-rule systems usually result 
less directly in data structures that arc 
similar to decision trees, the flexibility of 
their use and the explicit nature of the 
knowledge used to build them arc their 
key advantages. In effect, decision-tree 
software takes a shortcut. If a tree struc- 
ture is to result anyway, the approach of 
this type of software is to generate the 
structures as easily and efficiently as pos- 
sible, with the least amount of trouble to 
both the developer and user. But in doing 



this, decision-tree software gives up the 
ability to handle as broad a range of prob- 
lems and to give transparent reasons for 
the results. 

Decision modeling programs are sig- 
nificantly different from most of the prod- 
ucts discussed here. These programs 
belong to the category of decision support 
software. Although this is clearly an 
important class of knowledge-based soft- 
ware and uses decision trees, in most 
other respects these programs arc quite 
different from expert system development 
tools. 

An example-driven, rule induction sys- 
tem is one that can take the logical skele- 
ton of a problem— in terms of the value 
certain variables take as other variables 
change— and build a decision tree with the 
ability to induce a general rule about how 
one variable varies with another based on 
specific examples. In principle, the 
advantages of such a system are that it is 
rather straightforward to use, fast, and 
efficient. It is important, though, to care- 
fully evaluate particular implementations 
of this product to ensure that these advan- 
tages do in fact exist. 

Data base interfaces. To get the most 
out of a knowledge system, the system 
should be capable of interfacing with files 
of a powerful data base. Most businesses 
do not want to enter their data all over 
again, and it is not productive for users to 
have to continually answer questions 
about information that is already on the 
system. 

At the minimum, an interface capability 
should execute external programs and 
return values to the running knowledge 
system application. This allows the exter- 
nal program to query the user or a data 
base or read hardware sensors for values, 
perform calculations on them, and then 
return a value to the rule that requested it. 
But a fully configured interface capability 
would allow the expert system itself to 
send a fairly extensive list of parameters 
to an external environment for activating 
nested batch files and performing soph- 
isticated multiple queries to a relational 
data base. 

In terms of real-time use, it is often not 
adequate for the expert system to talk to 
the outside world only when it needs 
information. Alarms that come in have to 
be evaluated by the rules, and there has to 
be a way for the system to handle a rapid 
foray of such alarms without jumping 
from one to the other and never reaching 
any conclusions. 

What makes knowledge systems dis- 
tinctive, then, is not just their ability to 
incorporate sophisticated knowledge. 
They are also distinctive because of their 
capacity to do it explicitly and in such a 
way that it is relatively easy I o add and 
subtract knowledge from them and to par- 
tition them so that certain sections can 
accept alternate knowledge blocks. In this 
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A FULL C 

COMPILER 

FOR 



$4995 



The Ecosoft Eco-CSB compiler for the 8088 and MSD05 b going \o set new 
standard for price and performance. Consider the evidence: 



Compiler 


Eeo-CS8 


trite (1) 


CB6 (t) 


SflEve 


13 


11 


13 


Fib 


44 


58 


46 


Deref 


13 


13 


- 


Motrix 


21 


29 


27 


Price 


'49.95 


'500.00 


'395.00 



( 1 ) Computer language, Feb., 1985, pp.73-102. Reprinted by permission. 
Hie Eco-C88 compiler is a full K&R C compiler thol supports oil data types ond 
operators (except bit fields). Now look al the other features we offer: 

* 8087 co-processor support using a single library. If you install an 8087 
later, the software will use H without having to recompile. 

* A robust standard library with over 150 functions, including trans- 
cendentals, color, ond others. 

* OBI output for linking with the MS00S linker (LINK). 

* Error metsages in English - no cryptic numbers to look up. A real plus 
especially if you're |ust getting storied with C. 

* Easy-lo-read and complete user's manual. 

* Works with all IBM and compatibles running MSDOS 2.0 (or later). 

* Plus many other features. 

For S1Q.00 more, we will Include the source code for the C library functions 
(excluding rranscendentols). For an additional S15.00, we will include our 
ISAM file handler in OBJ formot (os published in the C Programmer's 
Library, Que Publishing). The discount prices for the library source ond ISAM 
only apply at the time the compiler is purchase d . Please add S4.00 to cover 
postage and handling. To order, call or write: 

EcoBOft Inc. 

6413 N. College Avenue 
Indianapolis, IN 46220 
(317) 255-6476 
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Pascal Users — Save Time & Errors 

(with PascalPac and tidy ) 

For the IBM PC, XT, AT. 

A major step toward paperless programming! 

Debug on the screen! 

Neater programs! 

PascalPac'" 

X-REF creates cross reference table. 
X-RAY browses cross reference and 
program simultaneously. 
X-PRNT is a versatile listing program. 
X-PEEK browses programs or text files. 
One version of PascalPac supports Microsoft 
and TURBO PASCAL. 

tidy'- 
Program formatter makes a PASCAL program easier to 
read, understand and modify, In use for over one year in 
major companies and programming organizations. Available in separate 
versions for Microsoft and TURBO PASCAL. 

■"tidy is a lightning- fast Pascal formatter from Major Software." 
"Of the products we've seen, we felt that tidy is the one most 
programmers will prefer." 

PC Tech journal 

PascalPac. . . .$69; Separate Modules. . .$60; tidy-Turbo. , .$49; tidy Microsoft.. .$69; Shipping. . .$5 

To order: VISAj MasterCard orders. Call (415) 941-1924. Or mail check/money order to: 
Major Software, 66 Sylvian Way, Los Altos, CA 94022 
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sort* 7 ; 

■r^ r ...waiting 

for C programs to 
compile and link? 




Use C-terp 

the complete C interpreter 

This is the product you've been 
waiting (and waiting) for! 

Increase your productivity and avoid 
agonizing waits. Get instant feedback of 
your C programs for debugging and rapid 
prototyping. Then use your compiler for 
what it does best.. .compiling efficient code 
...slowly. 

C-terp Features 

• Full K&R C (no compromises) 

• Complete built-in screen editor- 
no half-way house, this editor has every- 
thing you need such as multi-files, inter-file 
move and copy, global searching, auto- 
indent, tab control, and much more. 

• Fast--Linking and semi-compilation are 
breath-takingly fast. (From edit to run 
completion in a fraction of a second for 
small programs.) 

• Convenient- Compiling and running are 
only a key-stroke or two away. Errors 
direct you back to the editor with the 
cursor set to the trouble spot. 

• Object Module Support - Access functions 
and externals in object modules produced 
by C86 or Lattice C or assembly language. 
Utilize your existing libraries unchanged! 

• Complete Multiple Module Support- 
Instant global searches, auto-compile 
everything that" s changed, etc. 

• Many more features including batch mode, 
8087 support and symbolic debugging. 

• Runs on IBM PC, DOS 2.x, 192K and up. 

• Price: $300.00 (Demo $45.00) MC, VISA 

JVk e of demo rni tudi"> dm umentatian and ihpptng 
within US PA reskhntt add 6% safes f an 
Specify CH6 or Lattice WfSfofl 

llBIFBL iWffiul 

3207 Hogarth Lane • Collegeville, PA 19426 
(215)584-4261 

'Trademarks: CBfe (Computer lono^UomLlaxuce 
(Lattice (ncjt IBM (IBM Corp I C-terp (Ompe! Software) 
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MYSTIC 
PASCAL 

IS 10 TO 1000 
TIMES FASTER 
THAN TURBO 

Mystic Pascal compiles at over 100,000 
lines per minute on a standard IBM PC 
How? When you change a few lines of 
code, other Pascals make you recompile 
the whole program— Mystic only recom- 
piles those lines. As if thats not fast 
enough, the compiler even runs in the 
background while you arc editing. You 
can recompile a 2000 line program usually 
in less than one second. 

Mystic produces 8086 object code, opti- 
mised on two levels. The single precision 
floating point is 5 to 50 times faster than 
any other compiler. 4000 multiplications 
or 2000 divisions per second, without an 
8087— compare that to your present 
Pascal! 

Still not sold?! OK. Mystic Pascal is also 
interactive — Pascal statements can be in- 
stantly compiled and executed. And 
there's a Full Screen Editor. And Help 
windows for the Standard Pascal 
language. And support for multi-tasking. 
And its only — 

$39.95! 

Requires an IBM PC or true compatible 
with 256K. Turbo Pascal is a registered 
trademark of Borland International, Inc. 

MYSTIC CANYON SOFTWARE 

P.O. Box WW 

Pecos, New Mexico B7552 

Place your order today! 
Phone or use the coupon! 

(505) 988-4214 



Name . 



Address . 



City . 



State . 



- Zip . 



Price is $39.95 plus S4 shipping. 
Outside US ck. Canada add 520 shipping. 
Payment must he in US funds on a US 
bank. Purchase orders accepted from 
recognized institutions. 
NM residents add sales tax. 

Q Chcck/MO □ COD D VISA □ MC 



Card . 
Ex P . . 



Signature . 



form, the knowledge can be accessed to 
tell the user why it might he asking for 
what il is or how it produced the result it 
did. But for many tasks, there is still no 
way for expert systems to he used to 
lighten the workload of human experts. 
For example, a writer who knew nothing 
about expert systems could not use a sys- 
tem that is expert on the subject of expert 
systems to write this article. 

DECISION MODELING SOFTWARE 

A decision modeling system is one that is 
intended for problems thai involve select- 
ing one of a number of known alterna- 
tives. Rather than using knowledge pre- 
pared by an application developer, a 
decision modeling package is designed to 
allow users to incorporate their own 
knowledge and opinions in a systematic 
way to force a conclusion. 

Decision Support Software 
Expert Choice 

Decision Support Software Inc.'s system, 
written in compiled BASIC, allows very 
complex decision models and provides a 
graphic representation of the decision's 
structure. An integral part ofthe decision- 
tree display is a powerful tree editor that 
includes the ability to browse through a 
decision model at will. There is a complex 
system of weighting each ofthe factors 
and subfactors. All the necessary calcula- 
tions for distributing and proportioning 
the weights are done automatically by the 
system. 

To model a decision using Expert 
Choice, nodes of a tree are created that 
arc represented as boxes extending from a 
common node above and displayed in a 
row across the screen as each additional 
node is added. The root ofthe whole deci- 
sion tree is the goal node. Its name is the 
name ofthe decision being modeled. 
Every node box below the goal contains 
both its name and a number that desig- 
nates its resultant weight in comparison 
with its peer nodes on the same level 
descending from the same parent node. 

There is always one node, which is 
highlighted, that is the current focal node. 
Arrow keys arc used to move about in the 
tree, thereby changing the node that is 
highlighted. If the redraw command is 
issued, the display will change to show all 
the node boxes thai are the immediate 
children ofthe node that was current when 
the redraw command was issued. When 
the display of node boxes shifts down the 
tree, all the upper nodes, including the 
goal, are represented by oval characters in 
their proper position, connected by arc 
lines. The arrow keys can still be used to 
move to these symbolically represented 
upper nodes, highlighting them, and to 
redraw the tree display. 

It is easy to move quickly from node to 
node on the tree display and to redisplay 
the tree to show important details and to 
access desired nodes. The cdii function 



can be invoked to edit anything in the tree. 
The nodes affected by the editing oper- 
ations are the immediate children ofthe 
current node when the editor was 
invoked. The lowermost nodes in any 
branch ofthe tree are called the leaves of 
the tree. Up to seven node children can be 
created under each parent, and the tree 
can have as many as seven levels. 

From this I think you can see how pow- 
erful a tool Expert Choice is for giving a 
very graphic model ofthe structure of all 
the issues and suhissues of even the most 
complex decisions. But even more 
important than making the overall struc- 
ture ofthe decision explicit is defining 
how the various issues and subissucs 
interact and relate to each other. 

To establish how the various criteria or 
subcriteria relate involves going into the 
comparison mode. All combinations of 
two peer nodes on a given level are com- 
pared to one another. They are compared 
on up to three bases: likelihood, prefer- 
ence, and importance. The result of 
responses to these comparisons assigns 
relative numerical weights to each ofthe 
peer nodes. These relative weights arc 
transmitted proportionally to all ofthe 
branches below each node. 

Comparisons can be assigned both ver- 
bally and numerically. In the verbal mode 
arc multiple choices on how much more 
or less important, likely, or preferred one 
issue or criteria is to another. Answers to 
these questions result in a standard 
weighting assignment for each degree. In 
the numerical mode, the user is presented 
with one screen that has an impact matrix 
with all ofthe numerical weightings dis- 
played. Any ofthe numbers displayed 
may be changed. 

Generally, once you become familiar 
with how Expert Choice works, it is much 
faster and can be more accurate to use the 
numerical mode to assign any values on 
the one screen rather than to go through 
all the possible questions in the verbal 
mode. 

Once all the relative weightings for all 
the criteria have been assigned, it is nec- 
essary to make sure that all the main alter- 
natives exist as leaves at the bottom of all 
the branches you want considered. When 
the decision model is evaluated, the value 
for each leaf is calculated. Then the val- 
ues for all the identical leaves arc summed 
up and the results for each alternative are 
displayed on a bar graph, usually in order, 
with the winners highest and the losers 
lowest. 

In a decision mode! of any size, a 
potentially formidable editing problem 
exists in trying to get copies of all the 
decision alternatives to all the bottom leaf 
positions where they need to be. Fortu- 
nately. Expert Choice's tree editor has a 
powerful replicate command with an 
option thai allows the replication of 
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options to all the leaves of the tree. Thus, 
very complex and detailed decisions can 
be modeled with this system. Without this 
option, the time required to model a deci- 
sion using this approach would be 
formidable. 

The main limitation of Expert Choice is 
that it takes far too long for the evaluation 
of complex decisions because the value of 
each individual leaf is sent to the screen or 
printer branch by branch before the final 
score is displayed. There ought to be an 
option to see the results as rapidly as they 
can be computed rather than having to 
wait. This one flaw detracts from the use- 
fulness of an otherwise very ingeniously 
designed and welcome package. 

Lightyear 

Lightyear Inc.'s decision modeling system 
is very similar in purpose and scope to 
Expert Choice, with a few pluses and 
minuses. For instance, Lightyear has no 
visible tree hierarchy to edit. Instead, 
everything is done with lists and windows. 

The two systems have other differ- 
ences. In addition to quantified criteria, 
Lightyear supports a fairly powerful and 
easy-to-read rule syntax for imposing fur- 
ther conditions on the criteria. Also, the 
bar chart evaluation of the final results 
can be displayed at any time without hav- 
ing to wait. You can also ask for detailed 
evaluation charts of separate criteria in an 
alternative and have the charts display a 
comparison of any two alternatives for all 
criteria. In addition, Lightyear docs not 
limit the alternatives to seven. 

From this it may appear that Lightyear 
is simply a more powerful program than 
Expert Choice, but Lightyear has its lim- 
itations. The biggest of these is that it sup- 
ports only a single level of criteria, not the 
numerous levels of subcriteria that Expert 
Choice allows in its hierarchies. Thus, in 
spile of its excellent features for limiting 
criteria and alternatives in complex ways 
and quickly displaying the results vividly 
and effectively, Lightyear cannot model 
decisions that arc as complex as those 
Expert Choice can. So there is a trade-off: 
either you can choose to model complex 
decisions with limited options for dis- 
playing the results or you can opt for rapid 
modeling of simple choices with all the 
bells and whistles for display and evalu- 
ation purposes. 

Where Lightyear really gets interesting 
is in areas such as declaring the vocab- 
ulary for verbal criteria categories and 
using rules to limit the role of decision 
criteria. When a list of decision criteria is 
prepared, one of three modes must be 
assigned directly to each criteria. In addi- 
tion to the verbal and numeric modes 
found in Expert Choice, there is also a 
graphic mode. And the modes in Light- 
year are not just alternate ways for a user 
to access any criterion, but categories that 
are assigned to given criteria according to 
what is most appropriate for them. Of 



Program Editing with 



is More Productive and Less Frustrating 

because it will work YOUR way, and BRIEF elegantly integrates: 

• A high-level, readable Macro Programming Language - allows full parsing or 

syntax anaylsis. . . . Complete, unlimited variables, etc. 

• Edit multiple files of unlimited size (2 Meg is OK) 

• Mu Itiple Windows on screen with different or same file, fragments, etc, 

• A bona-fide UNDO stack (up to 300} of all operations: deletions, reading files, 

search, translate, more 
■ Full "regularexpression search" - wild cards, complex patterns 

• A completely recontigurable keyboard 

• Keystroke macros - for common typing sequences 

• Suspend BRIEF to execute, ex it to DOS - run another program (like a compiler, 

dir, XREF, D1FF, or DEBUG) then resume BRIEFsession 

• Compiler-specific support like aulo indent, syntax check, compile within BRIEF 
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Fuil refund if not satisfied in 30 days Systems 
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PROLOG-86 

Become Familiar in One Evening 

Thorough tutorials are designed to help learn the PROLOG language quickly. The in- 
teractive PROLOG-86 Interpreter gives immediate feedback. In a few hours you will 
begin to feel comfortable with it. In a few days you are likely to know enough to 
modify some of the more sophisticated sample programs. 

Sample Programs are Included like: 

■ an EXPERT SYSTEM 

■ a NATURAL LANGUAGE INTERFACE 

(it generates a dBASEII "DISPLAY" command) 

■ a GAME (it fakes less than 1 page of PROLOG-86) 

PROTOTYPE Ideas and Applications QUICKLY 

1 or 2 pages of PROLOG is often equivalent to 10 or 15 pages in "C" or PASCAL. It is a 
different way of thinking. 

Describe the FACTS and RULES without concern for what the computer will have to 
do. Maybe you will rewrite in another programming language when you are done. 
Programming Experience is not required but a logical mind is. PROLOG-86 supports 
the de facto STANDARD — in "Programming in Prolog" by Clocksin & Mellish, 

AVAILABILITY: PROLOG-86 runs on MSDOS, PCDOS or CPM-86 
machines. We provide most formats. 

Only 

$125 <3okjtion 

Full refund if not \-~. icrprTIC 

satisfied during <-Jy»Wl 1 13 

first 30 days. 



335-L Washington St., 
Norwell, Mass. 02061 
617-659-1571 

800-821-2492 
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course, it all boils down to assigning 
numerical weights, but to get the best 
results with a decision model . it is often 
very important to know how the com- 
parisons are presented. 

In the graphic mode, you are shown a 
sliding scale of the degree to which each 
decision alternative is affected by a crite- 
rion with a graphic mode. To express your 
grasp of these relationships, you move a 
marker of each alternative along a linear 
scale until you find a place that looks like 
the correct degree of impact. With the 
numeric mode criteria you supply the 
weighting factor as a number in the corre- 
sponding column. 

The verbal mode is more complicated. 
When you enter the verbal comparison 



mode you sec a rectangular window. On 
the left are all the criteria that have been 
designated V, for verbal. The top one will 
already be highlighted. In the center are 
the words and on the right the numerical 
weight values. But the words and numer- 
ical weights that appear apply only to the 
criterion that is highlighted. The words 
are descriptive terms such as Best, Worst. 
Average, etc. But these rating terms can 
be defined as the user sees fit to make 
them appropriate to the issues to which 
they refer. 

For example, if you were deciding on 
possible areas for relocating your busi- 
ness, you could define words such as 
North, South, East, and West for the Area 
criterion and assign each of them their 



Advanced 

Screen Management 

made easy 

Now a professional software tool from 
Creative Solutions. 

WINDOWS FOR C 

More than a window display system, 

WINDOWS FOR C is a video tool kit for all 

screen management tasks. 

■ Pop-up menus and help files 

■ Unlimited files and windows 

■ Instant screen changes 

■ Complete color control 

■ Horizontal and vertical scrolling 

■ Word wrap 

■ Highlighting 

■ Auto memory management 

■ Plus a library of over 50 
building block subroutines 

Designed for portability. 

Easy to learn, easy to use. 

Once you've tried WINDOWS FOR C, 
you'll wonder how you ever managed without it. 

Full support for IBM PC/XT/ AT and compatibles, plus interfaces for non-IBM computers; 
Lattice C. CI-C86. Mark Wm. C, Aztec C. Microsoft C, DeSmet C (PC/MSDOS). 



NEW Ver. 3.1 
Enhanced portability. 
Topview compatible. 

WINDOWS FOR C $195 

(specify compiler & version) 
Demo disk and manual S 30 

(applies toward purchase) 

Full source available. 
No royalties. 
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Creative Solutions 

21 Elm Ave., Box T7, 
Richford, VT 05476 

802-848-7738 

Master Card & Visa Accepted 

Shipping $2.50 

VT residents add 4% tax. 



numerical weight depending on your pref- 
erence for each. Similarly, as in Expert 
Choice, you could define the words so 
that they represent degrees of likelihood 
or importance or as any basis for com- 
paring the alternatives, such as the degree 
of known certainty or the degree to which 
you are sure it is what you want. 

One distinctive feature of Lightyear is 
its ability to further limit and control the 
decision criteria by defining rules that act 
as further constraints for the decision. 
The rule syntax is very easy to read and 
surprisingly versatile and powerful. A 
convenient rule editor prepares rules. 

There arc two basic types of rules to 
select from: simple rules and if-then rules. 
Once you have chosen your option, a rect- 
angular window is displayed for that rule. 
You select the criterion involved from a 
menu and then the operators, such as 
MUST BE, SHOULD NOT BE, and AT 
LEAST. There are facilities for modifying 
and deleting rules, and the summary eval- 
uation can be displayed immediately to 
sec the affect of the rule on the final out- 
come of the decision. 

Lightyear is a very satisfying program. 
Its primary advantage is the speed with 
which an application can be developed 
and executed. It would work very well 
with a mouse since it is menu- and list- 
oriented. One improvement, which would 
probably make this product the leader in 
its category, would be adding levels of 
subcriteria. as in Expert Choice. 

EXTENSION PACKAGES 
Programming Logic Systems APES 

APES — Augmented PROLOG for Expert 
Systems— is an extension of the PROLOG 
programming language. This Program- 
ming Logic Systems product provides an 
overlay system for Logic Programming 
Associate's Micro-PROLOG consisting of 
several modules that give additional facili- 
ties for user interaction and explain the 
reasoning behind conclusions. This is 
intended to pave the way for using the 
augmented PROLOG as an environment 
for developing and running less user- 
friendly knowledge systems or for devel- 
oping a more complete environment using 
PROLOG for the more familiar type of 
consultation and rule-based system. In 
addition, (here are modules that assist in 
editing knowledge bases and in preparing 
systems with overlay files on disk. This is 
important because the memory addressing 
capability of Micro-PROLOG is limited. 
Ideally, with such an approach and by 
using a RAM disk, these memory lim- 
itations could be overcome and larger 
applications could be developed. 

What APES really offers is a tool kit 
that helps make the powerful facilities 
inherent in PROLOG more comprehen- 
sible and easier to use. This can be helpful 
both to developers unfamiliar with PRO- 
LOG and for use in building a consulting 
environment for the end user. The main 
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Lifeboat. 



C is the language. 
Lifeboat is the source. 



TM 

Productivity Tools from the Leading Publisher of C Programs. 

The Lattice® C Compiler 



The cornerstone of a program is its compiler; it 
can make the difference between a good pro- 
gram and a great one. The Lattice C compiler 
features: 

• Full compatibility with Kernighan and 
Ritchie's standards 

• Four memory model options for control and 
versatility 

• Automatic sensing and use of the 8087 math 
chip 

• Choose from the widest selection of add-on 
options 

• Renowned for speed and code quality 

• Superior quality documentation 

"Lattice C produces remarkable code. . .the 
documentation sets such a high standard that 
others don't even come close ... in the top cat- 
egory for its quick compilation and execution 
time and consistent reliability." 

Byk Magazine 

Lattice Library source code also available. 

Language Utilities 

Pfix 86/Pfix 86 Plus — dynamic and symbolic 
debuggers respectively, these provide muSti- 
ple-vvindow debugging with breakpointing 
capability. 

Plink 86 — a two-pass overlay linkage editor 
that helps solve memory problems. 
Text Management Utilities — includes GREP 
(searches files for patterns), DIFF (differential 
text file comparator), and more. 
LMK (UNIX "make") — automates the con- 
struction of large multi-module products. 
Curses — lets you write programs with full 
screen output transportable among all UNIX, 
XENIX and PC-DOS systems without changing 
vour source code. 

BASTOC - translates MBASIC or CBASIC 
source code directly to Lattice C source code. 
C Cross Reference Generator — examines vour 



C source modules and produces a listing of 
each symbol and where it is referenced. 



Editors 



Pmate — a customizable full screen text editor 

featuring its own powerful macro command 

language. 

ES/P for C — C program entry with automatic 

syntax checking and formatting. 

VED1T — an easy-to-use word processor for 

use with V-PRINT. 

V-PRINT — a print formatting companion for 

VEDIT. 

CVUE — a full-screen editor that offers an 

easy way to use command structure. 

EMACS — a full screen multi window text 

editor. 

Fast/C — speeds up the cycle of edit-compile- 

debug-ed it-recompile. 



Graphics and Screen 
Design 



HALO — one of the industry's standard 
graphics development packages. Over 150 
graphics commands including line, arc, box, 
circle and ellipse primitives. The 10 Fontpack 
is also available. 

Panel — a screen formatter and data entry aid. 
Lattice Window — a library of subroutines al- 
lowing design of windows. 



Functions 



C-Food Smorgasbord — a tasty selection of 
utility functions for Lattice C programmers; 
includes a binary coded decimal arithmetic 
package, level I/O functions, a Terminal In- 
dependence Package, and more. 
Float-87 — supports the 8087 math chip to 
boost the speed of floating-point calculations. 
The Greenleaf Functions — a comprehensive 
library of over 200 routines. 
The Greenleaf Comm Library — an easv-to- 



use asynchronous communications library. 
C Power Packs — sets of functions useful for a 
wide variety of applications. 
BASIC C — This library is a simple bridge 
from IBM BASIC to C. 



Database Record 
Managers 



Phact — a database record manager library of C 
language functions, used in the creation and 
manipulation of large and small databases. 
Btrieve — a sophisticated file management sys- 
tem designed for developing applications under 
PC-DOS. Data can be instantly retrieved by key 
value. 

FABS — a Fast Access Btree Structure function 
library designed for rapid, keyed access to 
data files using muitipath structures. 
Autosort — a fast sort/merge utility. 
Lattice dB-C ISAM — a library oft functions 
that enables you to create and access dBase 
format database files. 



Cross-Compilers 



For programmers active in both micro and mini 
environments we provide advanced cross- 
compilers which product Intel 8086 object 
modules. All were developed to be as functional 
— and reliable — as the native compilers. They 
are available for the following systems: 
VAX/VMS, VAX/UNIX, 68K/UNIX-S, 
68K/UNIX-L 
Also, we have available: 
Z80 Cross-Compiler for MS- and PC-DOS — 
produces Z80 object modules in the Microsoft 
relocatable format. 



New Products 



Run/C — finally, a C interpreter for all levels of 
C Programmers. 

C Sprite — a symbolic debugger with break- 
point capability. 



Call LIFEBOAT: 1-800-847-7078. In NY, 1-212-860-0300. 
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DeSmet 
C 

8086/8088 

Development $111 Q 

Package SUSf 



FULL DEVELOPMENT PACKAGE 

■ Full K&H C Compiler 

• Assembler, Linker & Librarian 

■ Full-Screen Editor 

■ Execution Profiler 

■ Complete STDIO Library (>120 Func) 

Automatic DOS 1.X/2.X SUPPORT 

BOTH 8087 AND S/W FLOATING POINT 

OVERLAYS 

OUTSTANDING PERFORMANCE 

■ First and Second in AUG '83 BYTE 
benchmarks 



SYMBOLIC DEBUGGER 



50 



Examine & change variables by 
name using C expressions 
Flip between debug and display 
screen 

Display C source during execution 
Set multiple breakpoints by function 
or line number 



DOS LINK SUPPORT 
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Uses DOS ,OBJ Format 

LINKS with DOS ASM 

Uses Lattice® naming conventions 



Check: □ Dev. Pkg (109) 
D Debugger (50) 
□ DOS Link SupL (35) 
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advantages it provides are: 

■ Natural language templates for ques- 
tions posed to the user in a consultation 
and in answers made to requests for 
explaining the basis of results 

■ A menu-generating module 

■ A facility that can force PROLOG, 
under instructions, to ask the user for 
values it needs. 

An example of how the PROLOG envi- 
ronment looks when made more friendly 
by the APES front-end is in Listing 1 . 
Remember that this is not an application 
program per se, but Micro-PROLOG 
itself with the APES front-end and util- 
ities added to it! In this context, a user 
could delay responses to the '"Answer is" 
prompt by asking for an explanation or 
making a sophisticated query to the PRO- 
LOG data base. 

What APES points out most clearly is 
the power that PROLOG offers for expert 
system development. By adding a more 
English-like front-end, an explanation 
facility, and various utilities and using no 
inference procedure or representation lan- 
guage other than PROLOG, environments 
can be built that are suitable as is for many 
knowledge system projects and that can be 
extended for other systems. 



The one difficulty I sec is that because 
the source code is encrypted, a black box 
is created that could turn into a liability in 
some circumstances. If serious use of this 
system were planned, I would suggest that 
some arrangement be made with the 
authors to purchase a source code license. 
Although this could be expensive, it might 
prove economical in comparison with 
unforeseen development costs. 

Mountain View Press Expert-2 

Forth programmers have the opportunity 
to learn how a simple rule-based reason- 
ing system is built with this package 
written by Jack Park and distributed by 
Mountain View Press. 

Expert-2 comes on two disks, one with 
a run-time knowledge system module and 
the other with Forth source code screens. 
The user's guide contains a tutorial on 
expert systems that can help the complete 
novice grasp some of the fundamentals in 
knowledge system processing. Also 
included are tutorials that take beginners 
through the steps involved in writing pro- 
grams in both Expert-2 and Forth. An 
example of Expert-2 's rule syntax is 
presented in Listing 2. 



Which fruits did 


Peter 


like? 




Choose from the f 


ollowing 




1 - apples 








2 - pears 








3 - oranges 








4 - bananas 








Answer is pears 






(an earlier answer) 


Answer is 1 






(selecting apples) 


Answer is 2 






(selecting pears) 


** I already know Petei 


■ likes 


pears 


Answer is oranges 






(selecting oranges) 


Answer is end 








Listing 1. 









( RULE 1 — 


Me a 


sles ) 






IF subject has i 


-ash on scalp, then 


body 


AND 


subject 


has 


brownish pink rash 




AND 


subject 


has 


white 


spots inside 


cheek 


AND 


subject 


has 


conjunctivitis 




AND 


subject 


has 


bloodshot eyes 




AND 


subject 


has 


harsh 


hacking cough 


AND 


subject 


has 


high, 


fast, rising 


fever 


AND 


subject 


has 


runny 


nose 




THENHYP is Meas: 


.es 







Listing 2. 
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In this scheme, capitalized words arc 
operator key words. Experl-2 has five 
main types of operators: basic operators, 
negative context operators, RUN-iypc 
operators, the THENHYP operator, and 
BECAUSE operators. The basic operators 
are the IF, AND, and THEN familiar in all 
production rule languages. The negative 
context operators arc IFNOTand 
ANDNOT. An /F/VOrstatcmcnt is used as 
a condition that stipulates what will follow 
in the event that a state of affairs is not the 
case. <4/VD/V07"operates like AND in stip- 
ulating additional conditions, except that 
the described situation is not true. 

RUN -lypc operators arc used to access 
Forth subroutines. They include 
IFRUN, ANDRUN, THENRUN, and 
ANDTHENRUN. They all work anal- 
ogously to their namesakes, but instead of 
referencing a statement string they refer- 
ence any Forth word that has been defined 
and loaded . The one stipulation is that the 
words for the subroutines have to be 
loaded before the rules. The THENHYP 
operator states that the string that follows 
it will be considered a hypothesis to be 
tested rather than an outright truth. 
Finally, BECAUSE and BECAUSERUN are 
keywords that stipulate how the system 
will respond to a why (W) request by the 
user. With BECAUSE you can provide a 
statement like the others in a rule. 
BECAUSERUN allows you to call your 
own Forth word that can do whatever you 
want it to do in generating an elaborate 
explanation. 

Like the representation scheme, the 
inference mechanism is extremely simple. 
It seems to have been derived from an 
example in the first edition of Patrick 
Winston and Berthold Horn's LISP 
(Addison-Wcslcy). The main word is 
DIAGNOSE, which calls on VERIFY. 
DIAGNOSE accesses HYPSTACK. the 
hypothesis stack, and gets the pointer to 
the character siring that is the hypothesis 
it will try to prove. If the hypothesis is 
found to be true. DIAGNOSE stores its 
pointer in CURHYP . If not, it fetches 
another pointer from HYPSTACK. When 
VERIFY is called, it picks up a duplicate 
of this hypothesis pointer and attempts to 
see if the hypothesis is true. To do this, it 
calls on RECALL to see if the pointer is 
among those things considered facts. 

One interesting side note to Forth afi- 
cionados is the use of a forward reference 
in this program. When TESTIF+ calls 
VERIFY, it uses a feature of MVP-Forth 
that allows duplicate names by using a 
version of VERIFYlhal is actually an exe- 
cution vector. Normally in Forth you can- 
not call a word until it has already been 
defined. 

Although Expert-2 is an extremely sim- 
ple program and intended only as a learn- 
ing aid. with the inclusion of the source 
code and the RUN -type operators, pro- 
grammers should note that the full Forth 
language is present. Thus they can extend 



the program, write other inference 
engines for it, and add their own Forth 
subroutines freely from rule sets. A start 
on a forward-chaining inference pro- 
cedure is suggested with FINDRULES > . 
This is a nice, clearly explained pack- 
age for programmers to experiment both 
with simple knowledge engineering con- 
cepts and the implementation of rule pro- 
cessing and reasoning environments. 



RULE INDUCTION SYSTEMS 
Expert Systems Expert Ease 

It was inevitable that products offering 
ease of use in exchange for limited capa- 



bility would emerge. Here the attraction is 
a decision tree system that has a spread- 
shecttike editor and is totally example- 
driven. No rules have to be written with 
Expert Systems lne.'s Expert Ease. Spe- 
cific examples are entered and a type of 
decision rule is inferred that will handle 
the examples and other similar cases. 
While this sounds very easy, early reviews 
criticized Expert Ease for not being that 
easy to use at all. and I have to admit that 
when I first tried it. I was a little puzzled 
by exactly how everything fell into place. 

Some critics of Expert Ease have 
claimed that its knowledge bases consist 
of only one large rule. However, it might 



If lightning still scares you, 

you're using the wrong file manager. 




Be sure. Btrieve™ 

Lightning may strike. But it doesn't 
have to destroy your database. 

Btrieve™ file management offers 
automatic file recovery after a system 
crash. So accidents and power failures 
don't turn into database disasters. 
Your Btrieve-based applications will 
come up when the lights come back on. 

Fast. Btrieve is lightning fast, too. It's 
written in Assembly language espe- 
cially for the IBM PC™. And based on 
the b-tree file index ing system , with 
automatic balancing and electrifying 
access speed. 

The standard for networking. 
Btrieve/N (network version) sets the 
standard for the industry's most 
popular LANs, including IBM's PC 
Network. 

Fully-relational data management. 
SoftCraft's entire family of products 



gives you a complete, fully relational 
database management system. 
Rtrieve™ adds report writing capabil- 
ities. Xtrieve™ speeds users through 
database queries with interactive 
menus. 

For professional programmers. 
Btrieve is the fast, reliable answer for 
all your application development. In 
any development language— BASIC, 
Pascal, Cobol, C, Fortran, and APL. 
With Btrieve, you can develop better 
applications faster. And know they'll 
be safe if lightning strikes. 




SoftCraftlnc. 

P.O. Box 9802 #917 Austin, Texas 78766 
(512) 346-8380 Telex 358 200 



Suggested retail prices: Btrieve, $245; Blrieiv/N, $595; Xtrieiv. SI95; Xtrieiv/N, $395; Rtrieve, 5S5; 
Rtricve/N, $175. Requites PC-DOS or MS'"-DOS IX, 2.X. or 3.X. Btrieve, Xtrieiv, ami Rtrieve; IBM; 
ami MS are trademarks of SoflCmft Inc.; International Business Machines; ami Microsoft Inc. 
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be more accurate to say that the cases 
entered cannot lead to a rule that draws 
any conclusion other than one of the pos- 
sible final outcomes. This is equivalent to 
a system where various rules are possible 
but where the THEN part must always be 
about the final outcome rather than an 
intermediate result. 

Though this is true of Expert Ease, it 
is not a final limitation of the system 
because a chaining capability allows the 
conclusion of a decision tree to result in 
loading a new knowledge base beginning 
at the top of a new decision tree. In this 
way, a network of decisions can be built 
where only the final leaf evaluated repre- 
sents the outcome. The slowdown in 
speed caused by having to load another 
file from the disk for each link of the 
chain can be eliminated by using a RAM 
disk. Still, this does not put Expert Ease 
on an equal footing with systems that can 
simply use any legal statement in the rep- 
resentation language in the THEN part of a 
rule. The construction and debugging of 
these decision tree chaining networks is 
not a trivial task and is more difficult than 
simply adding rules in a production rule 
system. 

An application is developed in Expert 
Ease by making various entries in several 
different screens in the spreadsheetlike 
display. Below the screen display is a 
command line menu listing various single 
character commands. First enter "a" for 
the attribute screen where the main fac- 
tors in the decision are declared. The 
attributes are one of two types, integer or 
logical . The default is integer. To convert 
this to logical, a first value must be 
entered from the attribute screen as a 
string. The attribute is then displayed as 
the logical type. 

To begin entering example values for 
the attributes, shift to the examples 
screen. Already a number of flaws are 
apparent in Expert Ease's user interface 
that make it more difficult to use than it 
should be. All entering of values should 
be from one mode screen, and there 
should be an explicit command on the 
attributes screen for declaring attributes 
either integer or logical . 

The design has other faults also. First, 
there is generally no consistent way to 
back up once you've selected an editing 
command but then decide that's not what 
you really want to do. For example, in 
using the change option. I found that 
rather than being able to hit Escape to 
back out, I had to enter false values to get 
back to the editing menu and then delete 
the false values. Also, commands like n 
and v must be reentered each time a new 
entry is made. These should be offered as 
modes that can be toggled so that in enter- 
ing a list of attributes or values the com- 
mand does not have to be issued sepa- 
rately each time. Another difficulty with 



Expert Ease is that on-screen help, 
although available from the main menu, 
often is not available in situations where 
the user actually needs it the most. 

When all of the attributes and values for 
a decision are entered, the next step is to 
use them to generate a rule. This is done 
simply by hitting the ! character. The 
rule thai has been induced can then be 
inspected on the rule screen. 

After the rules have been induced, the 
next step is to test out the decision by 
selecting the query mode. Left to itself. 
Expert Ease will generate automatic ques- 
tions that ask for the value of each attri- 
bute and offer multiple choices that are 
selected by number. Fortunately, a text 
option allows you to word your own ques- 
tions as well as the conclusion. 

Perhaps the most important thing to 
recognize about Expert Ease is that there 
is no facility for asking how a conclusion 
was reached. This is not a trivial omis- 
sion. One of the most important differ- 
ences between rule-based systems and 
knowledge-embedded programs written 
with conventional algorithms is that 
because the knowledge is represented 
explicitly in rules, it can be accessed to 
help the user see the reasoning involved so 
that he or she is not expected to accept the 
conclusions blindly. For this reason. 
Expert Ease is not appropriate for any 
important applications where it would be 
irresponsible not to evaluate and question 
the result. before making an independent 
decision. 

In addition to Expert Systems Inc., a 
company called Human Edge Inc. is also 
lisccnsed to market Expert Ease. Human 
Edge is located at 2445 Faber PI . . Palo 
Alto, Calif., 94303, (415)493-1593. 

KDS 

If talking to the outside world by real-time 
data acquisition or the ability to call exter- 
nal programs is a central issue, then the 
KDS system may be worth looking into. 
This KDS Corp. product is an example- 
driven rule induction program designed 
along the same lines as Expert Ease. 

KDS, though, has a number of advan- 
tages over Expert Ease. First of all, it runs 
under MS-DOS rather than the UCSD p- 
system, which means that it can and does 
interface with other MS-DOS programs. 
In addition to this, it provides for cer- 
tainty factors and has two alternate infer- 
ence options and a back-up key that allows 
both a user and a developer to back their 
way through the decision tree at any 
point. Also, if you like skillfully designed 
color displays, then you may find the 
use of color text displays in KDS very 
effective. 

Another important factor is KDS's 
speed. Written entirely in assembly lan- 
guage, it is very possibly the fastest of all 
the systems reviewed here. I also think 
that KDS is somewhat easier to use than 



Expert Ease. The right screen panel is 
devoted to on-screen help messages that 
shadow where you are in the system and 
tell you what you need to know to pro- 
ceed. It also allows considerably larger 
applications to be developed. The Play- 
back module for end users can be pur- 
chased for S495. 

KDS does not deal with attributes and 
values but rather conditions described in 
text strings that are either true or false or 
known with some degree of certainty. One 
advantage of this is that it is not restricted 
to just one category of results for a given 
knowledge module. But it also means that 
the system acts like it creates only binary 
trees and the user is answering only yes or 
no to each condition. Actually, KDS is 
somewhat better than a binary decision 
tree system. To see how, it's best to know 
something about how the development 
environment works. 

When you first boot up KDS, you see 
this menu: 

[1] Enter new cases 

[2] Edit 

[3] Transform to finished KMOD 

[4] Make rules 

[5] Prinf-outs 

[6] Initialize knowledge file 

[7] Edit reference numbers 

[8] Require a definitive answer 

[9] Quit 

[Fl] Display case conclusions 

[F2] Display conditions 

To get started on a new application, you 
would hit [6]. The prompts for file name, 
author, copyright notice, etc., then 
appear. Next you are asked for the first 
condition. Then you see two more 
prompts, one for a conclusion that follows 
if it is true and another if it is false. After 
these are entered you are returned to the 
menu . Now you can choose [ 1 ] to add fur- 
ther cases. The conclusion of each case is 
a separate outcome and consists of what- 
ever text it is that you type. This means 
that there is no way for KDS to keep track 
of which conclusions are about the same 
issue or alternate options. There's just a 
string of text that has a certain place in the 
hierarchy, along with some factors associ- 
ated with it. 

Many advanced features of KDS give 
the developer some powerful and con- 
venient tools for chaining applications by 
creating additional files on subdirectories 
of the data disk. The KDS manual, how- 
ever, is quite ill-suited to this otherwise 
very streamlined product. It is rambling, 
verbose, and poorly conceived and orga- 
nized. A product like this needs a quick 
guide to get the end user up and running as 
quickly as possible, a well-organized ref- 
erence guide to let the experienced profes- 
sional see quickly everything that is there, 
and a knowledge system development 
tutorial for complete novices. 
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WHEN VOI ' BL'ILO A HOUSE . . . YOU IJONT ,VEEU 10 MAKE THE IVJMJUIVS V0I.HSE1.E. NOW . . , THE SAME IS TRUE WHEN Y0L"RE WRITING CODE. 



Windows With A View 
Toward The Future 

The Window 
Machine'" occupies 
only 12K! Wrilten in 
tight, fast Assembler, 
it performs like a 
racing engine. ..with 
more power than 
you'll probably ever 
need. Yet, it's an 
engine designed to fit 
in the vehicle of 
your choice. ..from a 
"stripped-down" 
128K IBM PC to a 
fully loaded AT. The 
programs you write 
today will run on 
the broadest range of 
machines possible... 
now, and in the 
future. 

Windows Bigger 
Than Your Screen? 

Here's where the 
VSI part of our name 
fits in. VSI means 
Virtual Screen Inter- 
face. Behind each 
window, there's a 
much bigger picture. 
VSI defines virtual 
screens rather than just windows. The 
window itself shows whatever portion of 
its virtual screen you wish to exhibit at 
any given point in your program. Each 
screen can be up to 128 x 255 (columns x 
rows, or rows x columns|. And there are 
more than 100 screen primitives at your 
command. 

Multilingual Windows 

You can order The Window Machine 
with the language interface of your choice: 
C, Pascal, Compiled Basic, Fortran, Cobol, 
or PL1. We've even recently completed 



These are 
coders' 
windows... 
designed to be 
built into the 
programs you 
are writing. 
They con 
overlap, move 
anywhere on 
the screen, 
grow, shrink, 
vanish or blink. 
They can be 
bordered in 
anything from 
a simple line to 
flashing 
asterisks. ..or 
even no border 
at all And 
you can have 
up to 255 of 
them at a time! 
Color or 
monochrome 
...of course! 



Why did Simon & 
Schuster, 3Com, 
Tymshare, and 
Revlon choose 
VSI-The Window 



figured if you wanted ribbons and bows 
you could always add them yourself.) 

And by offering you the product our- 
selves, we were able to cut out all the 
middlemen and save you a tremendous 
amount of money. 



VSI 



THE WINDOW 

MACHINE 



Available for ihc IBM PC. XT, AT. IBM Compatibles, 
Wang. T.I.. and HP ISO 

The Window Machine Includes: 



(and how come 
you can buy it for 
such a low price? 1 



$59.95 




« Zoom Windows 
i Multiple Virtual 
Screens (up to 255j 
i Choice of Borders 
(including flashing borders) 
■ Support for all Color and 
Monochrome Video Attributes 
(no graphics card required] 
i Built-in Diagnostics 
And much, much more 

ORDER YOUR COPY OF 

VSI— THE WINDOW MACHINE TODAY 

For Visa & MasterCard orders call toll free: 

800-538-815? Ext. 821 In CA 800-672-3470 Ext 824 

Cal I Mon.-Fri. GA.M. la 12 P.M.. Sal. i Sun. 6A.!H. 1o SP.M. (P.S.T.| 



an interface for Turbo Pascal*, so that 
now true, full-featured windowing can be 
utilized with this fine compiler. (Turbo's 
own built-in "windowing" procedure is 
extremely limited). 

Windows That Won't Break You 

We decided to save you a lot of money. 
So, we left behind fancy binders, mono- 
grammed slip cases and plastic pre- 
sentation boxes. Instead, you'll find an 
extremely powerful tool and a 200 page 
manual written with an eye toward 
simplicity, clarity and completeness. (We 

'Turbo Pascal is u Trrjdi:niQrfs 0/ Borland /nlurnclional 



The Windl* Michini' - S59.9S + S5 Shipping and Handling 

LANGUAGE INTERFACE: 
C Lattice CCRuli) Cobol QMlomsfl Basic Compiler □ Microsoll Fort™ 
DPLl CMisrosofl Pascal GTurbo Pascal Ifull featured true windowing! 
COMPUTES 



Name . 



Cilv 



_Statf .Zip Code 



OCiieck "Money Order EVISA OtalerCird 

Cardi Eip.Date- 



'California residents Ian included. Orders ourside USA: Please add 
510 for shipping and handling 

AMEER SVSTIMS 

1371 S. Saratoga-Sunnyvale Roao 
San lose. CA 95125 



3D day Money Back Guarantee 



I CI. 
I 



AMBER SYSTEMS, INC. 1171 S. Saratoga-Sunnyvale Road, San Jose CA 95129 
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SMALL PRODUCTION 
SYSTEM TOOLS 
Level Five Research Inc. 
Insight Knowledge System 

The only way to begin a description of 
Insight is to say that it is the best bargain 
around for the complete novice who wants 
to dabble in knowledge system develop- 
ment to find out what it is all about. This 
system, though in no sense the most pow- 
erful in the lineup, is very nearly fool- 
proof. Once you understand how the sys- 
tem works, you can go about making 
running knowledge systems that work 
without a lot of syntax problems and other 



complexities that distract you from con- 
centrating on the problem your applica- 
tion is supposed to help solve. 

Insight is both user friendly and fast. A 
lot of care has gone into designing its user 
interface. The system is entirely driven by 
function keys and menus and deliberately 
refrains from supporting color displays, 
so that those who have color monitors see 
everything in dull, unadorned white. 

As you proceed through a consultation 
with Insight, you are presented at each 
step with a distinct set of choices selected 
by indicated function keys that vary 
depending on the options chosen for the 
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LATTICE TOPVIEW 
TOOLBASKET RELEASED 

If you develop programs oriented to take ad- 
vantage of IBM's TopView multi-tasking win- 
dow environment, you need the Lattice Top- 
View Toolbasket. 

The Lattice TopView Toolbasket is a library 
of more than 70 C functions to control win- 
dow, cursor, and pointer functions, along with 
printer controls, cut and paste functions, 
debugging, and general utilities. It also in- 
cludes an assembler interface and master file 
and data definition headers. 

This new Lattice product speeds your pro- 
gram development with its documented tips 
on handling I/O and dispatch routines, plus its 
sample programs with source code and batch 
files your programs can be patterned after. 

The Lattice TopView Toolbasket runs on the 
IBM PC, XT, AT. and compatible systems with 
256K (512K and TopView Toolkit from IBM 
recommended). The Lattice TopView 
Toolbasket is available for S250. Binary and 
Source Code available for S500. The Lattice 
TopView Toolbasket was developed for Lat- 
tice by Strawberry Software. 

Speed your TopView program's release. 
Order the Lattice TopView Toolbasket today! 


The UNICALC Source Kit, used to develop 
SQL-Calc, is a component electronic spread- 
sheet kit for UNIX, MS-DOS, PC-DOS, and 
other systems that support the C language, 
and is available to other program developers. 
It allows program developers to incorporate 
electronic spreadsheet features into new or ex- 
isting software programs. UNICALC also gives 
users many display options and will generate 
printed reports in a variety of formats which 
may be saved for further manipulation by a 
word processing system. 

The UNICALC Source Kit is available with 
a wide range of royalty and licensing ar- 
rangements at very competitive pricing. Call 
Lattice, Inc. at (312) B58-7950 to discuss your 
applications. 

LATTICE C COMPILERS CHOSEN 
BY MORE THAN 26,000 
SOFTWARE DEVELOPERS! 

The top-selling C compiler, Lattice C. is now 
published directly by Lattice, Inc. 

When you purchase our edition, you get 
support directly from the people who wrote 
the C compiler. You also get free "bug fix'' up- 
dates during the warranty period. When you 
register your purchase with us, you are 
notified of all updates, enhancements, and 




UNICALC COMPONENT 
SPREADSHEET SOURCE KIT 
CHOSEN BY ORACLE 

Lattice, Inc. and Oracle Corp. have jointly 
developed SQ L-Caic, a unique product based 
on Lattice's UNICALC spreadsheet program 
and the ORACLE Database software. 

SOL-Calc gives users the ability to extract 
and manipulate database information using 
spreadsheet features made popular by pro- 
grams such as VisiCalc, SuperCalc, and Lotus 
1-2-3. SOL-Calc is the first full-featured spread- 
sheet to be coupled so closely with a power- 
ful relational database to give users the abili- 
ty to treat SQL database access statements 
like normal spreadsheet formulas. 


new C programming tools as they become 
available. And, as with all Lattice products, 
you are covered by a money-back guarantee, 
When you are ready to purchase a C com- 
piler, consider the source, Then call us: Latt- 
tice, Inc. 

ASK ABOUT OUR "TRADE 
UP TO LATTICE C POLICY" 

Lattice, Inc. 
P.O. Box 3072 
Glen EUyn, IL 60138 
(312) 858-7950 
TWX 910-291-2190 

InUTiuilitmiil S;ili^ Office* 
Belgium: Suiisliup lluinv |32l H-hiU,s7"i 
England: Rmimlhill llwrnc |<)fi72l ">Ji>7"i 
[,i|>;iu: l.ik-hn.il t'liniv |IKU XKt-471 1 
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user. At each step, your options are kept 
at a minimum and carefully laid out for 
you, making Insight very easy to learn and 
use. 

The other components of Insight are the 
rule language and the compiler. To pre- 
pare a knowledge base, an external text 
editor like Volkswriter Deluxe or the EC 
editor can be used. When you want to test 
the knowledge base, you compile it with a 
separate compile program and run it in the 
consulting component. 

The representation language is very 
rudimentary. Inequality operators are 
available for comparing numbers, but 
there are no numeric variables and no 
arithmetic operators for making simple 
calculations. Confidence values, how- 
ever, are supported. 

The inference engine employed by 
Insight is a simple backward chaining type 
of the familiar EMYCIN variety. It incor- 
porates a structured goal mechanism that 
allows the prime interest areas of a prob- 
lem to be specified. The system comes 
with an easy-to-read, 44-page manual thai 
is sparse on details about the inner work- 
ings of Insight. As a system intended pri- 
marily for the student of knowledge sys- 
tem development, a more comprehensive 
user guide and tutorial would be far more 
appropriate. 

EXSYS 

A little more expensive than Insight, but 
with substantial additional power. EXSYS 
Inc.'s product offers calculated variables, 
a rule editor, color displays, and the abil- 
ity to execute external programs that can 
be written in your favorite programming 
language. If your main objective is simply 
to get acquainted with the knowledge 
engineering process or to do some quick 
prototyping or proof of concept work for 
a proposed expert system, then EXSYS 
would be a relatively inexpensive way 
to go. 

This system has a number of convenient 
features. The representation language is 
surprisingly powerful. Compared with 
the more advanced and higher priced sys- 
tems, EXSYS lacks some important 
things, but it's a good idea to see how far 
you can take a system like this. By using u 
few tricks, you'll find ways to get around 
features you thought were necessary but 
are absent in EXSYS. 

The system consists of two main pro- 
grams: EXSYS.EXE. the run-time envi- 
ronment, and EDITXS.EXE. the develop- 
ment environment. One of the nice things 
about the EXSYS rule editor is the way 
the conditional qualifiers and choices, 
or outcomes, are kept in numbered lists 
so that it is not necessary to repeatedly 
retype the same items in different 
combinations. 

The main editing screen is divided into 
three windows, a right and left screen, 
and a command line at the bottom. The 
choices or outcomes are automatically 
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numbered so that to enter one from the list 
into a given rule it is only necessary to 
type its number. The same is true of the 
conditions as well as each condition's list 
of values. In each case, after you have 
entered a factor once, it is simply a matter 
of selecting numbers, and the correspond- 
ing text is automatically entered in the 
rule. If at some point you decide that you 
want to rearrange the order of the rules, 
there is a function for doing this. 

Mathematical formulas are not handled 
in the same way. They must be retyped 
each time. Another peculiarity of the 
arithmetic functions is that the numerical 
variable names, unlike the qualifiers and 
choices, cannot be deleted altogether 
from the system once entered. This is a 
minor flaw, but it limits your ability to 
experiment with things you might not 
want in the final version. 

There are three main modes for 
encoding an EXSYS knowledge base: for 
yes or no answers only, for certainty fac- 
tors ranging from one to 10, and for cer- 
tainty factors ranging from one to 100. 
Once an option is chosen it will hold the 
entire knowledge base. EXSYS also has 
options regarding such things as whether 
rules should be checked for consistency, 
whether rules should be displayed as rules 
to the end user, and whether variables 
should be displayed at the end of a 
session. 

On the whole, the EXSYS rule editor 
provides an extremely convenient envi- 
ronment for development. The one draw- 
back of this type of system is that EXSYS 
writes its own file formats that do not 
allow for editing rules in a normal text 
editor. Also, creating backups is 
extremely important, because if for any 
reason your knowledge base file becomes 
damaged and the EXSYS environment 
cannot read it properly, you have no other 
recourse. 

EXSYS also has the ability to call exter- 
nal programs. So far this can be used in a 
limited way to get additional data, to per- 
form calculations, and to make the data 
available to an EXSYS application . This 
can be done in two different ways. One 
method is used when just one value needs 
to be returned . The other enables a num- 
ber of different values for variables to be 
made accessible to an application running 
in EXSYS. For returning single numerical 
values, the R t//V procedure can be called 
from a rule to execute a program that 
requests input for calculating a value that 
will be made accessible to EXSYS by cre- 
ating the file RETURN.DAT. which 
EXSYS reads automatically. 

To return multiple variables as well as 
qualifiers involves making a special dec- 
laration to the rule editor at the outset. 
Also, a special format must be used in the 
RETURN.DAT file so that, in addition to 
the value itself, EXSYS knows whether it 
is a variable or qualifier and what its num- 
ber is. Using this option, programs that 



read data base or spreadsheet files and 
then write the values in the format to be 
picked up by the EXSYS knowledge base 
can be called from EXSYS. 

The one major limitation of both these 
procedures for interfacing with external 
data and programs is that there is not yet a 
way for EXSYS to pass data to the exter- 
nal program. However, plans exist to 
update this in the future, and it appears 
that this program, which was quite rudi- 
mentary when first released, will continue 
to add the capabilities that make it an 
increasingly attractive option for many 
applications. 

EXSYS already is being applied to a 
number of interesting uses. It is being 
used by the U.S. Dept. of Agriculture to 
aid farmers in deciding when and how 
much to irrigate crops, by a railroad com- 
pany to rapidly troubleshoot equipment 
malfunctions automatically, and by the 
U.S. Dept. of Energy to aid in decisions 
about security classification of 
information. W~ 



Expert Systems products 
and manufacturers 

Expert Choice — S495 

Decision Support Software Inc. 

1300 Vincent Place 

McLean, Va. 22101 

(703) 442-7900 

(800) 368-2022 (orders only) 

EXSYS-S295 
EXSYS Inc. 
P.O. Box 75 158 
Contract Station 14 
Albuquerque, N.M. 87194 
(505) 836-6676 

Expert Ease (v 1.1) — 3475 

Expert Systems Inc. 

868 West End Ave., Ste. 3A 

New York, N.Y. 10025 

(212)662-7206 

KDS — S795 (development system) 
KDS Corp. 
934 Hunter Rd. 
Wilmette, 111.60091 
(312)251-2621 

Insight Knowledge System (v 1 .2) — S95 
Level Five Research Inc. 
4980 South A- 1 -A 
Melbourne Beach, Fla. 32951 
(305) 729-9046 

Light/ear— S495 

Lightyear Inc. 

1333 Lawrence Expwy., Bldg. 210 

Santa Clara, Calif. 9505 1 

(408)985-8811 

Expert-2-S100 

Mountain View Press Inc. 

P.O. Box 4656 

Mountain View, Calif. 94040 

(415)961-4103 

APES-S395 

Programming Logic Systems 
3 1 Crescent Dr. 
Milford, Conn. 06460 
(203) 877-7988 



ACTIVE TRACE 

"Software that lives up to 

its promises. When a Basic 
program doesn't work the way you 
want it to, this package. . . will help 
you track the problem down. . . 
Scope is a toot for the beginning, 
advanced, or professional program- 
mer, and it begins where the cross 
reference maps leave off." 

Howard Glosser, Softalk for 

the IBM Personal Computer 

July '84, pp 120-121 



"Extremely useful program . . . 
Anyone doing much programming 
in Basic should appreciate Active 
Trace a lot." 

Jerry Pournelle, Byte Magazine 
April '83, p 234 



"A marvelous Basic programming 
aid. . .It's just amazing to watch a 
program you wrote run under Scope, 
and debugging becomes if not trivial, 
then at least doable" 
Thomas Bonoma, Microcomputing, 
Dec, '83, p 22 



". . .a really neat utility. . . 

designed to untangle even the 

most convoluted Basic 

program. . . .The documentation is 

almost worth the price of the 

package. " 

Susan Glinert-Cole, Creative 
Computing, July '84, p 210 



Active Trace will lead you through your 
program letting you know variable values 
(all variables or just those you specify) 
as they change. Your program's internal 
activity is presented on your screen, or 
printer, or it can be saved on disk. It's 
simple, effective and works with the 
BASIC you already own. 

Active Trace S79.95 

Includes Scope, XREF mapping and documentation 

Act™ Tract is available lor most MS-DOS and CPM 
Z,Z systems and supports the special leatures ot 
Brand specific versions ot Microsoft Basic such as 
Basica on me IBM-PC 



A 



WARE CO 



ctive Software 

P.O. Box 695 Gualala, CA 95445 

(707) 884-4019 
800-358-9120(US) 80Q-862-4948(CA) 

Active trace. Active sollware. ana Scope are Iraaemarks c-l 
AWARECO-CPM is a trademark ot Digilal Research-MS-DOS 

Ianfl Wicrosotl are trademarks ot Microsoft Corporation— IBM- 
PC is a trademark ol IBM Corp 
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Microprocessor programming made simple. 



"Keep it simple" was the principle 
of the 14th Century English philos- 
opher William of Occam and it has 
even more validity today. Faced with 
the problems of sophisticated 
computer systems, designers have 
found that ever more complex pro- 
gramming languages are further 
complicating their tasks. Until now. 

Occam. Created for system 
design and implementation. 

When we started designing our 
new VLSI family of 10-MIP trans- 
puters, we built on William's simple 
philosophy. To take advantage of 
the possibilities opened up by the 
transputer, we needed to create a 
language capable of properly ad- 
dressing parallelism and multi- 
processor systems. 

With the ability to describe con- 
currency (whether timeshared or 
real) and to handle message- 
passing at the lowest level of the 
language, all aspects of a system 
can be described, designed and 
implemented in occam. From in- 
terrupt handling through signal 
processing to screen editors to 
artificial intelligence. And on. 

But occam is not limited to our 



transputer family. It provides an 
efficient, responsive implementa- 
tion language for systems built 
on today's microprocessors. It also 
opens up future possibilities with 
its performance -enhancing 
multiprocessor capabilities. And 
INMOS now offers a product to let 
you exploit Occam's total capability 
in your system. 

Simplify your job with the 
Occam Programming System. 

The Occam Programming System 
(OPS) gives you the tools for com- 
plete VAX /VMS software develop- 
ment. This package includes an 
integrated editor /checker, an 
optimizing VAX compiler and full 
documentation. This gives you a 
supportive environment for the 
development of occam programs 



urn? m i-i *vj w 



for execution on the VAX. Cross- 
compilers for 68000 and 8086-based 
systems will also be available. 

What's more, the occam programs 
developed and proven on the OPS 
will give you a head start for work 
with the INMOS transputer. Exten- 
sions to the OPS will be available 
which will allow occam programs 
to run on the transputer. 

And if you have a requirement 
to program the transputer in other 
popular high-level languages, other 
extensions will include compilers 
for C, Fortran, and Pascal. 

Get started today. 

Contact us for our information 
pack on occam, the Occam Program- 
ming System and the transputer. 
You'll be surprised how simple 
your life can be. 

For quick response, call us at 
(303) 630-4000 or write: 
Occam, P.O. Box 1 6000, 
Colorado Springs, CO 80935. 



" l TV. 
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inmos.Wand occam are trademarks of che 
Jnmos Croup of Companies 
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SOFTWARE REVIEW 



Shopping for a LISP 



L 



ISP lives on. Most 
of the languages 
developed in the 
late 1950s and early 1960s have long since 
fallen by the wayside (FORTRAN is one 
great exception). But LISP continues to 
survive and even grow in strength and 
capabilities, and the recent swell of inter- 
est in artificial intelligence-based applica- 
tions has not diminished this growth. In 
fact, AI has become primarily responsible 
for LISP's continued existence. 

LISP is not the sort of thing that readily 
lends itself to a comparative style of 
review. By its very nature, LISP is a beast 
that seems to defy quick and easy descrip- 
tions, being as much a mind-set as a lan- 
guage. But how is one to critique the 
uniqueness of mind -sets? Granted, the 
standard benchmarks can be run. Feature 
matrices can be constructed. Commentary 
can be written. Yet none of these can fully 
convey the feel of these products. 

And the feel is what makes the differ- 
ence. To a large degree, this feel is cre- 
ated by the environment offered, which is 
a result of integrating the editor, inter- 
preter, debugger, and (in the case of a 
few) compiler, plus the style and quality 
of the documentation. It is the very seam- 
lessness of this integration that imparts a 
distinct ambiance nearly impossible to 
capture in the nonpoetic prose of a com- 
parative review. 

Each of these products had a different 
feel , and it would be difficult to say that 
any one was better than the others. But 
one attribute shared by all these products 
is the sense of satisfaction their authors 
must feel in providing realistic, workable, 
symbolic programming to the micro envi- 
ronment. It was a joy to work with these 
LISPs and talk to their authors. Heroes 
are hard to find. 

Test methodologies. There is a danger 
in relying too much on the results of 
benchmark tests. LISP, unlike C or Pas- 
cal, is not a language that tells its full 
story via execution speed. It should be 
emphasized that most LISPs are environ- 
ments for symbolic manipulation and not 
just test beds for number crunching. 

The diversity of the dialects encoun- 
tered in these tests, as well as the sheer 
size of some of the packages, preclude the 
authors from certifying that all efforts 



By Tom Kenyon 

were made to optimize the benchmark 
code for the particular package tested. My 
guess would be that almost all of the 
benchmark figures could be improved 
upon after some experience with the 
package. 

All three benchmarks required high 
degrees of recursion. This was intentional 
because LISP by nature is a highly recur- 
sive language. Two of the benchmarks are 
standard for almost any language: Fac- 
torial and Fibonacci (Listings 1 and 2). 
The third, MYREV/APP (Listing 3), is 
specialized for LISP and is a LISP imple- 
mentation of the standard LISP primative 
functions REVERSE and APPEND . This 
combined function was intended to give 
the symbol-slinging aspect of the lan- 
guage as hard a workout as possible. 

The MS-DOS benchmarks (Table 1) 



MS-DOS benchmarks 



were conducted on a Leading Edge PC 
set with a clock speed of 7. 14 MHz. All 
of the benchmark figures are in the 
format MINUTESrSECONDS.- 
HUNDREDTH-SECONDS. Table 2 
presents a useful general criteria cross- 
reference for each package. 

Levien Instrument BYSO LISP 

BYSO LISP's young creator, Raphael 
Levien, is to be congratulated for this rel- 
atively fast and complete package. BYSO 
is not without its problems but should 
overcome these as it matures. 

BYSO has the standard complement of 
LISP functions but is not too well docu- 
mented. The writing in the manual is 
stilted and, to some extent, incomprehen- 
sible. The section on the editor still has 
me puzzled. 



Manufacturer 
and product 

Levien Instrument 
BYSO LISP 

ExperTelligence Inc. 
ExperLISP 

Gold Hill 
GCLISP 

Integral Quality 
IQLISP 

Software Toolworks 

LISP/80 

Norell Data Systems 

LISP/88 

Microsoft 
MuLISP 

The Lisp Co. 
TLC-LISP (compiled) 

The Lisp Co. 
TLC-LISP (interpreted) 

Northwest Computer Algorithms 
UO-LISP (compiled) 

Northwest Computer Algorithms 
UO-LISP (interpreted) 

ProCode International 
Waltz LISP 

XLISP 
Table 1. 



Factorial Fibonacci MYREV/APP 

— 9.01 2:28.41 
0.79 0.32 

— 11.20 1:23.26 
3.74 16.28 2:30.88 



— 


2:23.21 


16:05.48 


3.11 


5,31 


29.64 


— 


9.37 


56.15 


— 


23.73 


2:45.66 


0.97 


2.81 


10.37 


6.58 


31.44 


10:10.02 


2.26 


13.17 


1 =23.26 


— 


1:46.04 


11:11.32 
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BYSO does not deal well with a color 
graphics adapter. Each keystroke gener- 
ated a burst of color and snow across the 
screen. Suspecting that IBM compatibility 
problems existed with the Leading Edge 
PC the tests were conducted on, I ran 
BYSO on an associate's straight IBM sys- 
tem and encountered the same problem. 

BYSO also did not deal well with buggy 
code. Rather than trapping errors and 
reporting them, BYSO had an annoying 
habit of going off into never-never land 
and remaining there until the computer 
was switched off and back on. 

When things were working well (on a 
monochrome monitor with perfect code), 
BYSO performed admirably. The bench- 
mark times were quite respectable, as was 
the completeness of the implementation. 
Unfortunately, BYSO's negatives out- 
weigh its positives. At $125 , BYSO 
does not constitute a good buy. The icing 



Factorial benchmark 



on this none-too-tasty cake is that BYSO is 
copy protected, bad news for a language 
product. For a few dollars more, one 
could purchase Waltz LISP, UO-LISP, or 
IQLISP, all of which perform well and are 
adequately documented. 

Gold Hill Computers GCLISP 

GCLISP (Golden Common LISP) is a 
subset of what many think will become the 
de facto standard LISP dialect— Common 
LISP, which is big, full-featured, and 
complex. But GCLISP differs from Com- 
mon LISP in one major respect— scoping. 
Common LISP is lexically scoped, while 
GCLISP is dynamically scoped. This 
presents a major compatibility problem. 
Gold Hill claims operational efficiency as 
the reason for dynamically scoping 
GCLISP. A lexically scoped system would 
probably execute at only half the speed. 
Gold Hill is foregoing the complete com- 



(DEFUN FACT (LAMBDA (X) 
(COND 

((LT X 2) 1) 

(T (* X (FACT (SUB1 X)))))) 

Invoking statement: (FACT 250) 



Listing 1. 



Fibonacci benchmark 

(DEFUN FIB (LAMBDA (X) 
(COND 

((LT X 2) 1) 

(T (+ (FIB (SUB1 X)) (FIB (-12)))) ) ) 

Invoking statement: (FIB 17) 
Listing 2. 



patibility of GCLISP with Common LISP 
until its compiler becomes available. The 
compiler should take care of the speed 
issue. 

Thorough is the operative word here. 
The system requires 5 12K to run. It has 
all of the features one would expect of a 
complete LISP system priced at $495 . 
The documentation consists of Patrick 
Henry Winston and Berthold Klaus Paul 
Horn's LISP (second edition), Guy 
Steele's COMMON LISP language defini- 
tion manual, and a user's manual. Besides 
the LISP interpreter, the system has an 
excellent GMACS editor and a first-rate, 
computer-based instruction course called 
the San Marco LISP Explorer. 

The GMACS editor is similar to the 
EMACS editor and has some very helpful 
features, including a blinking indication 
of matching parentheses. Operating the 
editor is relatively straightforward. The 
only downside to the editor is its frequent 
interruption for garbage collection. This 
can prove annoying on occasion. 

Evaluation of LISP forms can be done 
from the editor. This neutralizes the 
somewhat irritating necessity of saving 
the edited text on a disk file and then re- 
loading the file into the LISP interpreter 
for running. Multiple window buffers can 
be viewed and edited simultaneously. 

The San Marco LISP Explorer is fun. It 
contains a feature called the LISP 
Inspector that is nearly undocumented in 
the manuals. The LISP Inspector is a 
graphics and text showpiece that visually 
traces the execution of a LISP program. It 
is one of the slickest tools I have ever 
seen. The rest of the Explorer is a multi- 
part tutorial on LISP. It does an excellent 
job of adding hands-on support and sim- 
plifying explanations of topics addressed 
in the Winston and Horn text. 

The LISP interpreter itself is complete 
and stable. It contains a full complement 
of list operations, read and splice macros, 
recursive and iterative control structures, 
and integer and floating point math. The 
transcendental math functions have full 



MYREV/APP benchmark 

(DEFUN MYREV (LAMBDA (X) 
(COND 

((NULL X) NIL) 

(T (APP (MYREV (CDR X)) (LIST (CAR X)))) ) )) 

(DEFUN APP (LAMBDA (X Y) 
(COND 

((NULL X) Y) 

(T (APP (MYREV (CDR (MYREV X))) (CONS (CAR (MYREV X)) Y))) ) )) 

Invoking statement: (APP '(A B C D E F G) '(ABCDEFG)) 



Listing 3. 
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"Now I program 
with Power Windows" 




Alan R. Feuer 

Vice President, Research and Development 

Calalytix Corporation 

Author: The C Puzzle Booh 
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CCA EMACS...The Most Powerful Editor 
Environment Available for Unix and VAX/VMS 



"Programming with CCA EMACS, I can look at two 
or more files at once in different windows and then 
move text between them. " 

Alan Feuer is just one of many demanding 
programmers who have discovered that CCA 
EMACS™ makes program editing and system develop- 
ment much easier and faster. And "power windows" 
are only part of the reason Alan Feuer uses CCA 
EMACS. . . 

Unprecedented power, speed, functionality, extensi- 
bility, pliability, and consistency across systems and 
on any terminal are others. CCA EMACS includes 
close to 400 built-in commands which let you do any 
job with only a few keystrokes, even the kinds of 
things that are difficult or impossible with other edi- 
tors. And with our full Common Lisp-based extension 
language, Elisp™, you can customize CCA EMACS to 
meet all your specific program needs. 

CCA EMACS has two extensive recovery facilities to 
protect against system failures. Supported by a full 
online documentation package, including tutorial, the 
system can be used by beginners and experts alike. 

This complete kit of editing tools runs under Berkelev 
Unix™ (4.1 BSD and 4.2BSD). Bell Unix (Systems III 
and V), Xenix™, and VAX/VMS™. 
Binary prices range from $380 to $850 for Unix to 
SI 900 for VMS. 

CCA Uniworks, Inc. 

Productivity Tools for Programmers 
20 William Street, Wellesley MA 02181 
CIRCLE 60 ON READER SERVICE CARD 



For more information or to place an order 
call our customer representatives at 

800-2220214 

in MA (617) 235-2600 

or mail this request form today. 



Please send me information on: 

□ CCA EMACS = The Safe C Development Tools 
D AI Development Tools !_ Your complete line of state-oi- 

-the-art programming tools 

□ Please send license forms 

Name 

Title 

Company 

Address . 

City, State, Zip 

Phone ( ! „ 



CCA UNIWORKS, INC. 

20 William Street Wellesley, MA 02181 

^7 * Crowntek Company 

Unix, VAX and VMS and Xenix are trademarks of Bell Laboratories, Digital CL7B5 
Equipment Corporation, and Microsoft Corporation, respectively. Safe C is. a 
trademark ol Catalytix Corporation, CCA EMAC5 and Eli*p are trademarks of 
CCA Uniworks. Inc. 
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8087 support (in fact, most of them 
require the presence of an 8087). Only 
single-dimensioned arrays are supported. 

Among the more advanced features are 
closures, package support, windowing 
and I/O streams, and full use of optional 
and rest parameters. The debug package 
is quite complete and has the usual com- 
plement of trace, break, and single- 
stepping functions. The San Marco LISP 
Inspector is also available for debugging. 

All in all, this is a very complete pack- 
age, with features not found in any of the 
other packages. I have only one real crit- 
icism of GCLISP— it is copy protected. 

Integral Quality IQLISP 

Integral Quality's IQLISP is like a tank. It 



might not be the fastest thing on the road, 
but it is solid, dependable, full of features, 
and gets the job done in a no-nonsense 
fashion. It also has its fair share of 
chrome and flash. But unlike a tank, 
IQLISP is reasonably priced. It is a com- 
mercial grade system. In fact, several of 
the new Texas Instruments AI products 
for (he TI Professional were written with 
IQLISP. This should give you some indi- 
cation of the stability and maturity of this 
product. 

The IQLISP package contains an inter- 
preter, debugger, structure editor, and 
numerous development utilities. At this 
time it has no compiler, but Integral Qual- 
ity is promising a compiler sometime in 
the not too distant future. 



The IQLISP debugger and error mon- 
itor are the best of all the packages that 
were tested. The development environ- 
ment contains a set of functions to facili- 
tate the inspection of the stack after an 
error has occurred. Additionally, the 
monitor allows the programmer to restart 
computation from any of the suspended 
functions. A nicely laid out stack control 
window is presented whenever the error 
monitor is invoked. A lucid English error 
message appears, along with the expres- 
sion that caused the error. Ti.e user may 
then use the cursor control keys to climb 
up and down the stack and modify the 
offending expressions or values. Very 
slick. 

This system also provides a package 



General information 
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Levien Instrument 
BYSO LISP 

ExperTelligence Inc. 
ExperLISP 

Gold Hill 
GCLISP 

Integral Quality 
IQLISP 

Software Toolworks 

LISP/80 

Norell Data Systems 

LISP/88 

Microsoft 
MuUSP 

The Lisp Co. 
TLC-LISP 

Northwest Computer 

Algorithms 

UO-LISP 

ProCode 
International 
Waltz LISP 

XLISP 



1. See IEEE standard. 
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FS int 

FS int.real 

FS int,real 

struc mt,real 

struc int 

FS inf/int 

FS int.real 



no multi no no yes no no no no FE S no yes no 

— ' multi yes yes yes yes yes yes yes FE RS yes yes yes 

yes single yes yes yes no yes no yes FLSR RS yes yes yes 

yes multi yes yes yes no yes yes yes FLSR RS yes yes no 

no no no no yes no no yes no FE S no yes no 

no no yes no yes pseudo no yes yes FLSR RS yes yes no 

yes single yes yes yes yes yes no yes FLSR RS yes yes yes 



FS inf/int no single yes yes yes yes no yes yes FLSR RS yes yes in source 



FS inf/int 
no inl 



FS = Full screen. 

struc = Structure. 

inf/int = Infinite precision integers. 

FE = FEXPR EXPR. 

Table 2. 



no single no yes yes no no yes yes FLSR R5+ yes yes no 
no multi yes yes yes no no C source yes FE S no yes yes 



FLSR = FEXPR LEXPR subroutine. 

S = Sequential. 

RS = Random/sequential. 

RS+ = Rondom/sequential with additional types to find. 
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system, pretty printer, windows, 
graphics, floating point math with 8087 
support, multidimensional arrays, read 
and splice macros, and a good assembly 
language interface. File control is well 
implemented, as is a first-rate DOS 
interface. 

Suspended environments can be saved 
and restored with IQLISP. Garbage col- 
lection is relatively fast and unobtrusive. 
Oblist control is extensive. The 
DEVELOP. SYS package contains pack- 
aging commands and a full complement of 
structured programming functions. Using 
the structured commands can help ease 
the transition from a standard algebraic- 
type language to LISP. It is a big plus for 
this package. 

Documentation for IQLISP generally is 
good, although the manual could do with 
more examples. Overall, this is one fine 
package. 

Software Toolworks LISP/80 
Norell Data Systems LISP/88 

Software Toolworks' LISP/80 and Norell 
Data Systems' LISP/88 seem to be the 
same package in their MS-DOS incar- 
nations. What is said here applies to both 
interpreters. LISP/80 is friendly and slow 
compared to other implementations. The 
price and features make this an ideal LISP 
for someone who wants to learn the 
language. 

Watt Bilofsky, the author of LISP/80, 
says that some of his customers find it 
quite adequate for serious applications as 
well . but he does not make claims nor try 
to sell it for that sort of use. LISP/80 and 
LISP/88 are patterned after the INTER- 
LISP dialect of LISP and are integer-only 
systems. 

For LISPs in this price range ($39.95), 
the packages are feature-rich. In addition 
to the interpreter, LlSP/80and LISP/88 
contain a structure editor, pretty printer, 
several example programs (including a 
version of the ELIZA program), and a 
fairly complete manual. 

The manuals are divided into two parts: 
a humorously written tutorial and a lan- 
guage reference. The useful tracc/brcak- 
type debuggers feature a backtrace func- 
tion. LISP/80 and LISP/88 are small 
LISPs and spend a lot of time doing gar- 
bage collections. Use of available space 
can be optimized by reserving list cells 
and stack space when invoking the 
interpreter. 

Assembly language subroutines can 
also be written and interfaced. LISP/80 
and LISP/88 are written in C/80 and use 
that language's subroutine calling con- 
ventions. This procedure is quite straight- 
forward and is well documented in the 
manual. 

Microsoft MuLISP 

The Microsoft marketing boys are at it 
again. The front cover of the .VluLISP 



binder calls it an artificial intelligence 
development system. This almost leads 
one to suspect that next they'll be bun- 
dling an editor and macro assembler 
together to sell as an integrated spread- 
sheet development system. 

MuLISP was one of the first micro- 
computer implementations of LISP. It was 
developed by Al Rich, David Stoutmeyer, 
and Roy Feldman of the Soft Warehouse. 
What they designed was a high-perfor- 
mance, general purpose LISP program- 
ming system that is very good and very 
fast. 

The MuLISP package is also very com- 
plete. It contains an interpreter, a super 
editor called MuSTAR, a complete 
computer-based tutorial, and a competent 
debugger. In addition, it contains a num- 
ber of compatibility packages that allow it 
to function like INTERL1SP and MAC- 
LISP. The package is rounded out by a 
number of good demonstration programs. 

MuLISP is quite compact. The MS- 
DOS version can run (albeit not too effi- 
ciently) in as little as 64K. The MuLISP 
system itself is a combination pseudocode 
compiler and interpreter. It is very fast. 
The speed, however, comes at a cost. 
Error trapping is kept at a minimum. The 
pointer system is a closed pointer uni- 
verse, which prevents the implementation 
of closures. But these arc minor problems 
and do not impact the overall quality of 
the package. 

MuLISP has a full complement of the 
things that define a good LISP package: 
sequential and random access I/O, I/O 
streams, highly efficient string functions, 
infinite precision integer arithmetic (no 
floating point support, however), read and 
splice macros, and a table-driven scanner. 
A graphics support package is also 
included. MuLISP does not support 
arrays or a package system. 

The MuSTAR editor features a console 
customization function for adaptation to 
almost any computer. The editor allows 
the editing of functions, variables, and 
property lists. Evaluation of the LISP 
form from within the editor also is 
provided. 

The Lisp Company TLC-LISP 

TLC-LISP, put out by The Lisp Company, 
is one of the more complete packages in 
this group and features one of the nicest 
documentation packages. It isn't often 
that a manual is written with such style 
and elegance that it can be readjust for 
reading's sake. And the LISP tutorial por- 
tion of the manual compares favorably 
with many of the LISP texts I have read in 
the past. 

TLC-LISP is sleek and elegant. The 
interpreter and compiler fulfill the prom- 
ise of the manual. This package is one of a 
handful of LISPs that include a full class 
system, and the class system implemented 
here is very LISP-machine-like in nature. 




COMPLETE. Over 300 tested 
and well documented func- 
tions. All features of the PC 
&AT are at your finger tips. 

ADVANCED. Features like 
windows, data entry fields, 
switching displays, and batch 
file execution are supported. 

GRAPHICS. A complete set 
of fast business graphics 
functions. Our low level 

graphics routines are the 
fastest in the business. 

SOURCE. All source code is 
included. 95% of the library 
is written in C. Only func- 
tions demanding fast execu- 
tion speed are in Assembler. 

COMPATIBLE. With Lattice, 
MicrosoftO.O), CI-C86, 
Aztec, DeSmet, Wizard, and 
Mark Williams. All memory 
models are supported. 

MUCH MORE. Dozens of 
string functions, the best 
time & date math and for- 
matting, DOS directory and 
file mgmt., keyboard control, 
polled async communications, 
and more. NO ROYALTIES. 
We SUPPORT what we sell. 

C UTILITY LIBRARY - $185 
COMPILERS: Lattice $349, 
C1-C86 $329, Mark Williams 
$449. Save $40-$50 with 
compiler & library package. 

Specify compiler and version 
number when ordering. Add S4 for 
UPS or $7 for UPS 2-day shipping. 
NJ residents add 6% sales tax. 
VISA, MC, Chks & qualified PO's. 



Essential Software, Inc. 

P.O. Box 1003 

Maplewood. New Jersey 07040 

914/762-6605 
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SOFTWARE 
DEVELOPERS! 

V-RLE 

THE VIRTUAL MEMORY 

FILE MANAGER 

Let V-RLE save precious development 
time & cost as you create efficient appli- 
cations with the power of VIRTUAL MEMORY 

DON'T RE-INVENT THE WHEEL 
Why spend weeks or months coding and 
debugging file and memory management 
systems when you can order V-FILE today, 
V-FILE is a library that you can link with 
your code to provide sophisticated virtual 
file and memory management — allowing 
you to concentrate on developing your 
application. 

VIRTUAL DATA 
OBJECTS SUPPORTED! 

Data is referenced by using VIRTUAL 
MEMORY DATA HANDLES. Your code 
doesn't need to know whether the data 
is actually on disk or in RAM. Swapping 
between disk and RAM and updating files 
on disk is handled automatically and trans- 
parently! Complex VIRTUAL DATA 
STRUCTURES can be created by linking 
with data handles instead of pointers. 

CHECK THESE FEATURES! 

• Multiple, independent swap buffers 

• Multiple files per swap buffer 

• Highly efficient swap algorithm 

• Automatic file updating 

• Data prefetching supported 

• Data may be locked in memory 

• Memory buffers may be flushed 

• Makes full use of extended memory on 
IBM PC/AT 

• SOURCE CODE AVAILABLE 

• NO ROYALTIES REQUIRED 

Supports Dos 2.00+ with 

Lattice & Microsoft C compilers 

Supports Microsoft windows 



$299 



FILE 



TM 



Contact: 
MindBanfc. Inc. 
4620 Henry Street 
Pittsburgh. PA 15213 
412/683-9800 



VISA/MASTER CARD ACCEPTED 
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It supports separate name spaces in a 
monolithic address space. The author says 
this is in anticipation of very large address 
spaces (and therefore very large projects) 
that will be available in the near future. 
This technique will be of substantial use 
as the size and number of embedded LISP 
applications expand. TLC- LISP contains 
the full complement of class operators 
CUSS, INSTANCE, and INHERITANCE. 

Like IQLISP, TLC-LISP includes many 
structured forms of iterations: CASEmd 
CATCH-THROW pahs, and DO. The 
addition of these explicit control struc- 
tures to the implicit control (call-by-value 
and recursion) of LISP provides a very 
powerful set of control tools. 

TLC-LISP's interpreter is quite slovv, 
but the compiler increases efficiency 
fourfold or better. For instance, the 
MYREV/APP benchmark required nearly 
4 min to finish running interpretivcly. 
But after compiling, the system executed 
in just over 50 sec. The debug package 
allows tracing compiled functions. 

There is debate as to whether floating 
point math is necessary for a symbolic 
language. I. for one, use LISP for the 
development of vision and imaging sys- 
tems. Convolution would be impossible 
without it. TLC-LISP supports floating 
point math and the 8087 chip. 

Other features worth noting are full 
graphics, turtle graphics, a DOS inter- 
face, an autoloader, I/O streams, a full 
screen editor, and a library of IBM PC 
specific features. Overall, this was one of 
the best packages tested and is highly 
recommended. 

Northwest Computer Algorithms 
UO-LISP 

Northwest Computer Algorithms' UO- 
LISP was a surprise. After seeing the ads 
for the package. I was anticipating a 
stripped-down learning system similar to 
LISP/80. Wrong. The UO-LISP develop- 
ment system is full and complete. It is also 
unbelievably fast. 

The compiler version for MS-DOS is 
an extended version of UO-LISP 1 . 16a 
(the CP/M version). The interpreter is rel- 
atively slow. Once compiled, however, 
UO-LISP turned in the fastest speeds of 
any of the LISPs tested. The compiler, 
incidentally, can be toggled to produce a 
complete assembly code listing that can 
then be further optimized by the 
programmer. 

The package is feature-rich and worked 
in a predictable and reliable fashion. The 
only glitch occurred when loading a 
buggy program from a disk. This caused 
the cvaluator to stick in a loop that neither 
Control-C nor Control-ALT-delete could 
terminate. The machine had to be 
switched off and then back on to regain 
control. 

Calling UO-LISP complete may be a bit 
of an understatement. Besides the inter- 
preter and compiler. UO-LISP contains a 



complete debugging (trace) package and 
an execution profiler. Utility packages 
include three editors — structure, charac- 
ter, and full screen— an RLISP dialect 
compatibility package, the LISPTEX text 
formatter, a BIGNUM and FIXNUM sys- 
tem for handling large integers and fixed 
point numbers, sort/merge, two printing 
systems (pretty printer and terse printer), 
and one of the better screen and graphics 
driver packages I've seen. One of my 
favorite features was a history-saving 
read loop that allowed me to play back a 
LISP session. PC-DOS interface routines 
also are included. 

Documentation is copious. The manual 
is nearly 400 pages long. It is clearly writ- 
ten and contains hundreds of examples. At 
S150, this is certainly a bargain. 

ProCode International Waltz LISP 

Waltz LISP, by ProCode International, 
has been a long-time favorite of the CP/M 
crowd and deservedly so. It occupies less 
than 30K of RAM . It provides an excep- 
tionally efficient and friendly working 
environment by virtue of the fact that the 
debugger and error-handling routines 
remain on-line (in RAM) at all times 
rather than relying on overlays. 

It has the fastest and fanciest file access 
system of the LISPs tested (this is where 
the benchmarks can lead one astray — if 
any of the benchmarks were to test ran- 
dom access file handling. Waltz LISP 
would have left the others in the dust). 
The elegance of the file handler allows for 
the near instantaneous access of any byte 
in the file. This enables easy program- 
ming of virtual function storage and, to a 
great extent, entire virtual programs. 
Waltz LISP does not limit the user to the 
number of open files dictated by the 
FILES m NN declaration in the CON- 
FIG.SYS file. Waltz creates its own han- 
dles and provides for open file manipu- 
lation up to the available memory limit. 
Waltz LISP fully supports the MS-DOS 
2.x file system, including the sub- 
directory structure. 

The Waltz LISP package contains a 
WordStar-like full screen editor that 
allows editing files of almost any size 
from within the LISP environment. In 
addition, ProCode plans to add another 
RAM resident editor in the near future. 

As with most of the better LISPs. Waltz 
LISP includes the standard suite of struc- 
tured programming control functions (do, 
let, catch, etc.). Large integers with 
selectable radix are supported up to 6 1 1 
digits. Floating points arc not supported. 
The usual complement of mappers, pretty 
printers, I/O streams, and sort/merge are 
included. 

The documentation for this product. 



FOR THE SERIOUS KAYPRO® USER 



THE DISKIT 

SERIES OF 

HARD DISK 

DRIVES 



now 




with 
ZCPR3 by Echelon, Inc. 

Now you can add from 5 to 40 Megabytes of fast-access Winchester 
storage to your KAYPRO 2, 4, or 10. The DISKIT is only 4 inches high; 
5.7 if you get the two drive model with the removable 5 or 10 Mb. 
cartridge, and weighs less than 10 pounds. Easily disconnect DISKIT 
from the computer whenever you want, and if more capacity is required, 
just swap your drive for a larger model. 

Our DISKIT Model 10 has 10.8 Megabytes of formatted capacity . . . 20% 
more than a Kaypro 10, and runs about twice as fast. Installs in minutes. 
Call SPC now and ask for more information. Quantity and prepayment 
discounts are available. 

SYSTEMS PERIPHERALS CONSULTANTS 

9747 Business Park Avenue 

San Diego, CA 92131 

(619) 693-8611 
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THE WORLD'S FASTEST 
MOST POWERFUL 8080 
RELOCATING MACRO 
ASSEMBLER 



sum 


AC 



ONLY 



AT THIS PRICE, SHOULD YOU BE WASTING 
YOUR TIME USING SOMETHING ELSE? 



This is what they said about 
Z80ASM. our Z80 assembler. Now 
the same features and performance 
are available in our Intel Mnemonic 
product. SLRMAC is compatible 
with M80 in .8080 mode, with many 
extensions. Too many features to 
list here. 

To order or to find out more 
about our complete family of 
development tools, call or write: 

<ri p Systems 

1622 N. Main St., Butler, PA 16001 
(800) 833-3061, (412) 282-0864 
Telex 559215 SLR SYS 

C.O.D., Check or 
Money Order Accepted. 

Add S3 shipping. 
Z80 CP/M compatibility required. 



". . a breath of fresh air . ," 

Computer Language, Feb. 85 
". . in two words, I'd say speed & 
flexibility". 

Edward Joyce, Nov. 84 
Microcomputing 



NORMALIZED PERFORMANCE 




i.rr 






Assemble 

ZCPH3 

to create a 






.75- 




U 

< 


HEX file. 


< 
s 
















DC 


o 


rr 




.50- 




tfl 

o 
o 


5 ° 

r- ™ 

N CM 


tn 

8 


O o 

< 00 

E £ 


.2 5- 














CM CM 

















1:10 4:24 5:19 

2Mhz 

8"SS/SD 



:05 :41 ;42 
8Mhz 

RamDisk 



YOU NEED 
A G00D#i 
LIBRARY* 




POWER PACKS 



COMPLETE SOURCES 
NO ROYALTIES 

COMPREHENSIVE C Power Packs 
include over 1000 functions which 
provide an integrated environment 
for developing your applications ef- 
ficiently. "This is a beautifully doc- 
umented, incredibly comprehensive 
set of C Function Libraries." 

- Dr. Dobb's Journal, July 1984 

USEFUL "...can be used as an ex- 
cellent learning tool for beginning C 
Programmers..." 

- PC User's Group of Colorado, Jan. 1985 

FLEXIBLE Most Compilers and all 
Memory Models supported. 
RECOMMENDED "I have no hesita- 
tion in recommending it to any pro- 
grammer interested in producing 
more applications code, using more 
of the PC capabilities, in much less 
time." - Microsystems, Oct. 1984 

■■ PACK 1: Building Blocks I $149 
DOS, Keyboard, File, 
Printer, Video, Async 

■ PACK 2: Database $399 
B-Tree, Virtual Memory,- 

Lists, Variable Records 

■ PACK 3: Communications $149 
Smartmodem™, Xon/Xoff, 
X-Modem, Modem-7 

g PACK 4: Building Blocks II $149 
Dates, Textwindows, Menus. 
Data Compression, Graphics 



| PACK 5: Mathematics I 

Log, Trig, Random, 
Std Deviation 



$99 



S99 



■ PACK 6: Utilities I 
(EXE files) 

Arc, Diff, Replace, Scan, Wipe 

Master CanWisa. S7 Shipping. Mass. Sales Tax 5% 

ASK FOR FREE DEMO DISKETTE 



novun 
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inc. 
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toaaons 
inc. 
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over 300 pages, is quite good. It is written 
with a sensitivity for (he beginner bul is 
not short on the nuts and bolts information 
required by the experienced LISP 
practitioner. 

XUSP 

XLISP is a public domain LISP inter- 
preter. David Betz. the author, provides 
both an executable file and the source for 
the interpreter in C. The documentation is 
sketchy but provides the necessary syn- 
tactical information lor the experienced 
LISP programmer, 



What is surprising about XLISP is its 
completeness. It incorporates a full 
object-oriented programming system. 
CLASS, INSTANCE', and INHERITANCE 
are fully supported. The usual list- 
handling and control forms also are 
included. 

The operation of XLISP was entirely 
bug free as far as I could tell. The version 
tested. 1 .4. is sufficiently mature to 
ensure good operation. 

Written in C, the language is easily 
extensible. Numerous bulletin boards 
contain code for the addition of floating 



points, graphics, and communications to 
the package. I have talked to the author on 
several occasions, and he fully supports 
the idea of additions to the package, but 
he requests that those making changes for- 
ward a copy of the extensions to him. He 
is trying to work as a clearinghouse for 
the XLISP language and appreciates 
knowing what's going on with the 
language. 

For those who want to get their feet wet 
with symbolic programming. I can think 
of no better way than with XLISP and a 
good introductory text to LISP. B 



For the Macintosh: ExperTell 

ExperLISP is a result of Exper- 
Telligence Inc.'s historical sup- 
port for artificial intelligence. The 
company claims it is the first compiled 
implementation but Table 2 shows oth- 
erwise. ExperTelligence plans a future 
release that will correct some of the 
bugs reported to date. 

While the Mac does not have color 
graphics at this time, you are able to 
specify five shades between black and 
white. The sample graphics program 
offers two-dimensional, three- 
dimensional, and spherical bunny 
graphics like Logo's. A complex fig- 
ure was drawn in three windows simul- 
taneously. It was quite impressive. 

Programming errors are indicated 
and the next release promises to pin- 
point the variables within the specified 
line even better. A listener window 
keeps track of all interactive code and 
the second window holds the program 
in an edit buffer. It is very easy to click 
back and forth between the two win- 
dows to compile your code, either 
selected sections or the entire buffer. 
Compiled code is not saved in the ini- 
tial release. A file compiler will be 
available in the near future, as well as 
the ability to save a .snapshot of 
memory. ExperLISP is lexically 
scoped, so symbols are bound within 
the scope of their containing body. 

The benchmark times are 
impressive and the number of func- 
tions and commands (403 in version 
1,0) extensive. The cost is SI. 23 per 
function. If this is within your budget, 
then 1 highly recommend this product. 
It has the added advantage of calling 
assembly language routines directly. 
Numbers may be integer or real (float- 
ing point), and 80-bit precision is 
offered with the Apple SANE pack- 
age, IEEE standard. Garbage col- 
lection uses the mark and sweep 
method. A future release will be able 
to control this space. 

Also provided with this product is 



igence ExperLISP 

An ExperLISP Reference Guide , 1 89 
pages; David S. Touretzky's LISP: A 
Gentle Introduction to Symbolic Com- 
putation . 384 pages; two disks; and 
four pages of notes to ensure com- 
patibility between ExperLISP and 
Touretzky's LISP. You can have it 
either way. 

ExperLISP has three sample pro- 
grams: search, a case-sensitive search: 
graphics: and Quicksort, a numerical 
sort. Because LISP has several dia- 
lects, the guide with each function 
indicates whether it is primitive, what 
type it is. the version it will be imple- 
mented in (1.0 or 1.1), and if it came 
from Common LISP, ZetaLISP, or the 
Macintosh Toolbox (ROM) or is 
unique to ExperLISP. 

As ExperLISP is under active devel- 
opment, those who support the release 
of 1 .0 will receive updates to release 
2.0 at a nominal cost (disk plus ship- 
ping). The current release makes 
extensive internal use of the class sys- 
tem. Later you will be able to define 
your own classes and methods. See 
Patrick Henry Winston and Berthold 
Klaus Paul Horn's LISP (second edi- 
tion) for object-oriented program- 
ming. Apple is introducing Object 
Pascal, which will include classes and 
objects to handle the user interface 
portions of a Macintosh application. 
This will be called MacApp. A version 
will be in release 2.0 of MacApp in 
LISP. See also K.J. Schmucker's 
Object-Oriented Programming on Mac- 
intosh and Lisa. 

Overall, this ExperLISP package is 
excellent, and the future offers many 
new advancements to drive LISP to 
even greater heights. 

ExperLISP-$495 

ExperTelligence Inc. 

559 San Ysidro Rd. 

Santa Barbara, Calif. 93108 

(805)969-7874 

By Robert Ashworth 



LISP products and 
manufacturers 

BYSO LISP-SI 25 
Levien Instrument 
Box 31 

McDowell, Va. 24458 
(703) 396-3345 

GCLI5P-S495 
Gold Hill Computers 
163 Harvard St. 
Cambridge, Mass. 02 1 39 
(617)492-2071 

IQ-LISP— $175 

Integral Quality Inc. 
P.O.Box 31970 
Seattle, Wash. 
(206)527-2918 

LISP/80-S39.95 

Software Toolworks 

15233 Ventura Blvd., Ste. 1118 

Sherman Oaks, Calif. 91403 

(818)986-4885 

USP/88-S49.95 

Norell Data Systems 

P.O. Box 70 127 

3400 Wilshire Blvd. 

Los Angeles, Calif. 900 1 

(213)748-5978 

MuLISP-$300(lBM) S25Q(CP/M( 

Microsoft 

10700 Northup Way 

Box 97200 

Bellevue, Wash. 98009 

(800) 426-9400 

TLC-LISP-S250 

The Lisp Co. 

P.O. Box 487 

Redwood Estates, Calif. 95044 

(408) 354-3668 

UO-LISP-S150 

Northwest Computer Algorithms 

P.O. Box 90995 

Long Beach, Calif. 90809 

(213)426-1893 

Waltz LISP-S169 (IBM and CP/M) 
ProCode International 
1 5930 SW Colony PI. 
Portland, Ore. 97224 
(503) 684-3000 

XLISP — S7 (add S3 for overseas) 

PC/BLUE Users Group 

The New York Amateur Computer Club Inc. 

Box 106 

Church 5t. Station 

New York, N.Y. 10008 
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i dig for y our IBM PC 

The new 
standard for 
convenience. 




Now the mbp COBOL Compiler offers 
unrivaled convenience to go with its 
unmatched performance. 

Here are the convenience 
features you've wished for: 

l) an enhanced Screen 
Management System with pro- 
gram-controlled video attributes 
and color; 2) support for PATH & 
sub-directories; 3) DOS command 
execution from within a COBOL 
program; 4) permanent' DEFAULT 
modification. 

The new mbp Compiler has them 
all! And they're exclusives: you get them only with mbp. 

Plus, it's 4 times faster. 

Because the mbp COBOL Compiler generates native machine 

language object code, it executes programs at least 4 times faster 

(see chart). Now. we've made 
that performance even 
more convenient to use. 

The complete COBOL. 

An Interactive Sym- 
bolic Debug Package 
included standard; Multi- 
keyed ISAM structure; SORT 
& CHAIN; GSA certification 

to ANSI 74 Level II; IBM/PC -AT and TI Professional compatibility; 

with mbp, you get it all. Optional: Novell NetWare interface. 

mbp COBOL: the choice of professionals. 

It's no surprise more and more companies like Bechtel, Bank 
of America, Chase, Citicorp, Connecticut Mutual, Hughes Aircraft, 
McDonnell-Douglass, and Price-Waterhouse choose mbp COBOL. 

Make it your choice, too. Just send the coupon, or call, for 
complete information. Today 
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Please semi complete mbp COBOL information 
to: 



GIBSON MLX Benchmark Results 

Calculated S-Profile 
(Representative COBOL statement mix) 

Execution time ratio 



mbp' 
COBOL 

1.00 



Level II* 

COBOL 

4.08 



R-M' Microsoft 1 
COBOL COBOL 



5.98 



6.18 



Matt a a Mis'oiolt T\< 



CITY/STATBZIP - 



mbp Software & Systems Technology, Inc. 

7700 Edge water Drive. Suite 360 
Oakland, CA 94621 

Phone 415/632-1555 r 
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C Programmers: 



Consider 104 Ways — 
To Be More Productive 



If you find and choose the right development soft- 
ware, you can: cut development effort, make imprac- 
tical projects feasible, and eliminate unproductive, 
frustrating aspects of programming. 

Confused? We'll help you sort thru the huge number 
of alternatives. Call for comparisons or information. 



Learn C Programming 
Only $95 

"Introducing C" Interpreter 

Computer innovations hos done 
it agoin! This interactive implemen- 
tation is combined with a full 
screen editor and a thorough, self- 
paced manual 

You can develop programs fas- 
ter t>v getting immediate feed- 
back Programs will start instantly 
upon your command There is no 
need to wait for compile and 
link." 

Introducing C includes demo 
programs, powerful C language 
interpreter, complete C function 
library, full screen editor, color 
graphics, ond C language com- 
patibility PCDOS S95 



Simplify 
Screen Management 

Windows for C 

Keep your software up to dote 
with the latest screen manage- 
ment features 

• Pop up menus and help files 

• Instant screen changes 

• Multiple windows 

• Complete color control 
Windows for C offers all of these 

plus much more in an integrated, 
compact, easy-to-use library of ob- 
ject code functions. Thorough, 
reference manual. Support for all 
memory models of popular C 
compilers New version 3 1 offers 
enhanced portability and TopView 
compatibility. Full source avail- 
able MSDOS S180 



Which Compiler Features Do You Need? 

Optimizing C86 Compiler 

Over the years the Optimizing C86 has evolved to be the most complete 
set of C compiler tools. It includes utilities, a rich library, and thorough tech 
support In line 8087/287 routines run up to 100 times faster than the 8086 
math packoge The source code to all routines is included, so you have 
complete control over how they work Thorough ROM support. Intel UDI & 
VMS cross versions ore ovoiloole. 

More of the features you want include: 

• special IBM-PC library • 2 math and 2 I/O libraries 

• full memory utilization of the 8086/88/186/266 
» compatibility with most commercial libraries 

• object and source module librarian MSDOS £339 

Get File Access with 
TIGHTER Control 

db_VISTA Data Management 

Full source, no royalties and "normal" indexed file management are 
part of db_VISTA. Get .more for the price of only an ISAM. 

You can minimize data stored and access records even faster and 
more logically than just using indexes. Example: address and transaction 
data should not require redundant storage of customer names or 
numbers. Use pointers. Related data fields point to other related groups 
- the "network model" of data 

Use db^VISTA as a "normal ISAM" or save programming time, access 
time ond file size. Lattice, C86, Williams, Desmet, Microsoft C. 



We carry 27 C Compilers, 4 C Intepreters, 49 Support 
Libraries, 5 C source debuggers, and 19 other C Add- 
ons for programming with MSDOS, Macintosh, or 
CP/M - more than 104 products, really. Here are 
some of the best products available: 



SORT/MERGE Files for 
Clean, Fast Maintenance 

With OPT-TECH SORT 

Performance should not suffer 
with DOS or other "free" sorts. 
ISAMs alone are slow when 10% or 
even less is changed/odded. 
OPT-TECH includes: 

- CALLable and Standalone use 

- C, ASM, BAS, PAS, FTN, COBOL 

- Variable and fixed length 

- 1 to 9 fields to sort/merge 

- Autoselect ot RAM or disk 

- Options: dBASE, BTrieve files 

- 1 to 10 files Input 

- No sofware max for # Records 

- All common field types 

- By pass headers, limit sort 

- Inplace sort option 

- Output = Record or keys 

Try what you're using on an XT: 
1,000 128 byte records, 10 byte key 
in 33 seconds. MSDOS $90 



Add Communications 

Features to 

Your Programs 

Greenleat Cotnm Library 

Greenleaf now enables you to 
communicate with remote systems 
or databases with an asynchronous 
communications library for C 

Individual transmission ond re- 
ception ring buffers combine with 
on interrupt driven system This 
eliminates the extra tunction of 
separately calling up the com- 
munications program. 

Included are 1 library/object files, 
100 functions; 100 page manual, 
complete source code, library 
taiior-made to suit compiler and 
memory, Hayes-compatible 
modem commands, and a com- 
plete sample file transfer program 
MSDOS $169 



Inventive Programming Becomes Possible 
with 300 + ESSENTIAL, tested, fast, routines to Rely On. 

C Utititles Library by Essential Software 

Recent Enhancements to Graphics, Windows, AT Support 

Every application you write is likely to require functions where you feel like 
you are "reinventing". Don't. Even if you use only 5% of this library, you will 
come out ahead on schedule dnd cost. 

Full business Graphics, Window support, polled Communications, and 
Data Entry support have recently been added/upgraded along with more 
functions for DOS Interface and AT support. String handling, screen control, 
"word processor" functions, memory management, directory and path ac- 
cess, date handling, program chaining, keyboard and printer control are 
traditional strengths. 

Full source code is included. No royalties are charged to include functions 
in your programs. 95% are C tor portability and to moke it practical for you 
to understand or modify them. 

Lattice, Microsoft, C86, Mark Williams, Aztec, Desmet and Wizard C ore 
supported. Specify which you need. 

Substantial time, effort, testing and attention has been invested by Essen- 
tial Software developing, documenting and supporting this comprehensive 
library. Make new projects practical and interesting. Use this tested and 
reliable library. 

Some functions are PC-specific. Most support any MSDOS. $159. 



MSDOS. Source $450, Object S275 

Call for details, comparisons, or for our"C Extras Packet" with over 50 pages of information about C support products 



PROGRAMMER'S I 

The programmer's complete source for software, services and answers 
128-LC Rockland Street, Hanover, MA 02339 (617) 826-7531 (800) 421-8006 



Ask about COO and PCs All formats available. Prices subject to change Names at products and componles are generally their trademarks 
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SOFTWARE REVIEW 



PC PROLOGS 



By Namir Clement Shammas 



P 



ROLOG is one of 
the [atesl arti- 
ficial intelligence 
languages lo gain popularity. In this 
review wc will look at the various PRO- 
LOG packages that currently are available 
tor the IBM PC microcomputer running 
under MS-DOS 2.0 or later. 

The primary published reference for 
PROLOG is Programming in PROLOG by 
W.R Clocksin and C.S. Mellish. pub- 
lished by Springer- Verlag. This book 
defines a core PROLOG. An alternate 
PROLOG syntax is found in Micro- 
PROLOG, which is implemented by LPA 
Micro-PROLOG. 

In this review we will look at each 
package's extension and how it reflects 
the authors' creativity. Several of the 
PROLOG implementations reviewed are 
still undergoing changes and enhance- 
ments. These numerous language exten- 
sions appear to have created a portability 
problem for such systems as the IBM PC. 
Four benchmark tests were used in this 
comparison: 

■ The Sieve of Eratosthenes 

■ List reversal 

■ Quicksort 

■ The Tower of Hanoi. 

The Sieve test returns a list of primes up 
lo 100. This does not correspond to the 
Sieve version used in benchmark tests of 
other languages such as BASIC. C. Pas- 
cal, and Modula-2. The main limitation of 
this test is the stack overflow due to exten- 
sive recursion, which is something PRO- 
LOG seems lo rely on heavily. 

The list reversal was a simple test sug- 
gested by Automata Design Associates. 
Quicksort and the Tower of Hanoi were 
included to check internal speed in more 
elaborate schemes. The Tower of Hanoi 
reflects the combined speed of internal 
processing and screen display. 

While there were other, more elaborate 
benchmark tests suggested, they used 
commands peculiar to some imple- 
mentations. However, since some of the 
PROLOG implementations are still in 
their infancy, expect additional develop- 
ment in this area, particularly more predi- 
cates and greater speed. So note that the 
speed benchmarks presented here are not 
the final word! 

Table I is a comparison table. Table 2 



shows the results of the benchmark tests. 

Arity/PROLOG 

This heavyweight product comes from 
Arity Corp.. a subsidiary of Lotus Devel- 
opment Corp. Two versions are available: 
the PROLOG interpreter and the complete 
system, which includes a PROLOG com- 
piler. The implementation revolves 
around the Clocksin and Mellish defini- 
tion, with a few modifications and several 
versatile additions. 

The Arity/PROLOG interpreter dis- 
plays the'.'- question prompt which makes 
it more accessible to answering questions. 
To assert any fact from the keyboard, the 
assertaQ and assertzO predicates must be 
used. The assert () predicate is not 
implemented. 

Arity/PROLOG supports all the PRO- 
LOG data types, including tloating point 
numbers. Trigonometric and transcen- 
dental mathematical functions are 
offered, as are the AND. OR. NOT. and 



shift left and shift right bitwise 
operations. 

In addition, Arity/PROLOG supports 
strings and data base reference numbers. 
The latter are eight-hexadecimal-digit 
codes with the tilde symbol to their left, 
acting as reference points for the data 
base. As with other PROLOG imple- 
mentations, Arity/PROLOG supports 
data classification predicates, including 
predicates to indicate if a datum is a vari- 
able, atom, or integer. 

Arity/PROLOG has added predicates to 
test for floats, strings, and data base refer- 
ence numbers. In addition, the general 
purpose predicate type (Code, Arg) can be 
implemented to identify integers, strings, 
floating point reals, and data base refer- 
ence numbers. 

Arity/PROLOG also provides a number 
of predicates that perform such string 
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SO = Stack overflow. 

IE = Interpreter logical error. 

CT = Compulsory tracing, 
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General information 
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1. PROLOG 5-plus, a lorge memory model PROLOG, will be released in September. 

2. Special version. 

Table 2, 
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wizaR6 c 

Fast compiles, fast code and great diagnostics 
make Wizard C unbeatable on MSDOS. Discover 
the powers of Wizard C: 

• ALL UNIX SYSTEM III LANGUAGE FEATURES. 

• UP TO A MEGABYTE OF CODE OR DATA. 

• SUPPORT FOR 8087 AND 80186. 

• FULL LIBRARY SOURCE CODE, OVER 200 FUNCTIONS. 

• CROSS-FILE CHECKS OF PARAMETER PASSING. 
■ USES MSDOS LINK OR PLINK-86. 

• CAN CALL OR BE CALLED BY PASCAL ROUTINES. 

• IN-LINE ASSEMBLY LANGUAGE. 

• 240 PAGE MANUAL WITH INDEX. 

• NO LICENSE FEE FOR COMPILED PROGRAMS. 

The new standard for C Compilers on MSDOS! 
Only $450 



WSS 



For more information call (617) 641-2379 

Wizard Systems Software, Inc. 

11 Willow Ct., Arlington, MA 02174 

Visa/Mastercard accepted 
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Now With Windowing! 
$49.95 Basic Compiler 



MTBA5IC 

Features: 
Multitasking Windowing 
Handles interrupts Interactive 

Fast native code Compiles quickly 
Floating point No runtime fee 

MTBASIC is a true native code compiler. It runs Byte 's Sept. '81 
sieve in 26 seconds; interpreters take over 1400 seconds! Because 
MTBASIC is multitasking, it can run up to 10 Basic routines at the 
same time, while displaying ten separate windows. Pop-up/down 
menus are a snap to implement. 

The MTBASIC package includes all the necessary software to 
run in interpreter or compiler mode, an installation program (so 
any system can use windowing), three demonstration programs 
and a comprehensive manual. 

AVAILABLE for CP/M (Z-80), MS-DOS, and PC-DOS systems. 

ORDERING: Specify format when ordering. We accept Visa, MC, 
checks and COD. Send $49.95 plus S3. 50 shipping and handling 
($10 overseas) to: 



I 



>OriAiainc\ 



P.O. Box 2412 Columbia, MD 21045-1412 
301/792-8096 
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POWER 

C LIBRARIES 
C WINDOWS 

Best You Can Get ! 

325 Fully Tesled Functions 
SIX C LIBRARIES 

FUNCTIONS rBU DON'T HAVE BUT HEED! 
All Source Code. No royalties. 
51 screen handlinj/Eiaphic 

functions S49.95 

50 cursDr/keyboaroVdalj 

input functions S39.95 
85 superior siring 

functions $59.95 

25 system status I control 

functions S29S5 

72 ulilily/DOS/BIOS/time/ 

date (unctions $49.95 
42 printer control 

functions S29.95 



RICHLY COMMENTED 
EASY TO LEARN 
EASY TO MODIFY 



6 • • * • o » 



NO MATTER WHAT ELSE 

YOU HAVE 

GET THESE!! 

ANY3LIBRARTES"S69.95 
ALL 6 LIBRARIES $99.95 

50 MOST NEEDED FUNCTIONS 
S 49.95 

POWER WIN DOWS 

PROFESSIONAL WINDOW MANAGEMENT 

OVERLAYS, BORDERS, 
POPUP MENUS, HELP WINDOWS, 
STATUS-LINE, COLOR HIGHLIGHTING, 
AND MOREII! 

C WINDOWS: COMPLETE SOURCE CODE S99.95 



ALL LIBRARIES 

PLUS 

WINDOWS $149195 

€ntelekon 

SOFTWARE SYSTEMS 



EHTELEKDN 12IF8 KIMBERLEV 
HOUSTON. TX. 77024 f 7 13) -4 6 8-4412 

VISA-MASTERCARD-CHECK 
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NGS FORTH 



A FAST FORTH, 
OPTIMIZED FOR THE IBM 
PERSONAL COMPUTER AND 
MS-DOS COMPATIBLES. 

STANDARD FEATURES 
INCLUDE; 

•79 STANDARD 

•DIRECT I/O ACCESS 

•FULL ACCESS TO MS-DOS 
FILES AND FUNCTIONS 

•ENVIRONMENT SAVE 
& LOAD 

•MULTI -SEGMENTED FOR 
LARGE APPLICATIONS 

•EXTENDED ADDRESSING 

•MEMORY ALLOCATION 
CONFIGURABLE ON-LINE 

•AUTO LOAD SCREEN BOOT 

•LINE & SCREEN EDITORS 

•DECOMPILER AND 
DEBUGGING AIDS 

•8088 ASSEMBLER 

•GRAPHICS & SOUND 

•NGS ENHANCEMENTS 

•DETAILED MANUAL 

•INEXPENSIVE UPGRADES 

•NGS USER NEWSLETTER 

A COMPLETE FORTH 
DEVELOPMENT SYSTEM. 

PRICES START AT $70 

NEW^HP-150 & HP- 110 
VERSIONS AVAILABLE 



m 



NEXT GENERATION SYSTEMS 
P.O.BOX 2987 
SANTA CLARA/ CA. 95055 
(408) 241-5909 



manipulation as string search, obtaining 
substrings, string length, and concate- 
nation. Predicates to convert between 
strings and other data types are also avail- 
able, including conversions with terms, 
atoms, integers, floating point reals, and 
lists. Each predicate is capable of per- 
forming a two-way transformation, 
depending on which argument is 
instantiated. 

Thirty-two external counters are pro- 
vided and can be accessed by all parts of a 
program at any recursive level. Four 
predicates are provided to initialize, 
increment, decrement, and recall coun- 
ters. Other predicates count the number of 
atoms in a list, convert from lists to 
atoms, and convert from atoms to lists. 

Arity/PROLOG implements versatile 
I/O facilities. The keyb(Ascii,Scun) predi- 
cate allows the PROLOG interpreter to 
scan any codes generated by pressing any 
of the IBM PC keyboard function keys 
and cursor control keys on the numeric 
hexpad. Combinations of these keys with 
the control key and alternate keys are also 
scanned. 

There are also predicates to check 
screen cursor position and to move the 
cursor to a specified location. Screen 
brightness can be controlled, and the 
screen will display underlined characters, 
reverse video and blinking characters, and 
blinking underlined and blinking reverse 
video characters. Controlling the scroll- 
ing of a specific screen area is also 
possible. 

Both sequential and random access files 
are supported. Five I/O modes exist: 
read, write, append, read-or-write, and 
read-or-append. The latter two modes are 
involved with random access files. The 
SEEK predicate is used to locate informa- 
tion stored in random access files. Arity/ 
PROLOG also provides predicates to 
redirect F/O and perform bytewise port 
I/O. 

Accessing the MS-DOS command 
interpreter also is possible. This tempo- 
rarily suspends the action of the PROLOG 
interpreter. Typing Exit in MS-DOS takes 
you back to PROLOG. A wide variety of 
MS-DOS file manipulation from within 
Arity/PROLOG can also be performed, 
including directory listing; making, 
choosing, and removing directories: 
deleting and renaming files; accessing and 
setting file attributes; and accessing the 
system clock and date. 

I was able to run all the benchmark pro- 
grams with Arity/PROLOG. The inter- 
preter ran a close third to PROLOG-86 
and PROLOG- l's interpreters, and its 
Tower of Hanoi screen output speed was 
faster than PROLOG- l'-s. 

Automata Design Associates 
ADA PROLOG 

This product comes from Automata 



Design Associates. It is available in many 
versions, ranging from a low-cost intro- 
ductory model to a large virtual memory., 
system model. The latter incorporates 
mass storage devices as memory exten- 
sions. The language was developed using 
C. 

ADA PROLOG uses a '?- question 
prompt, making the system more acces- 
sible to answering questions. To assert 
any fact from the keyboard, the assertf), 
assertaO, and assertzO predicates must be 
used . 

This product supports all PROLOG 
data types, including floating point num- 
bers. A special, large memory language 
version supports the 8087 chip. Several 
mathematical functions are offered, 
including transcendental, trigonometric, 
and conversion. AND, OR, XOR. and bit- 
wise negation operations are also offered. 

ADA PROLOG has no built-in editor, 
but it offers an EXEC function that allows 
the execution of other programs from 
within PROLOG, assuming there is 
enough memory. Thus your favorite text 
editor can be invoked to change any PRO- 
LOG program. The reconsutt predicate 
can be called to update the fact data base 
to reflect changes made during the editing 
process. 

Many new predicates included in 
ADA PROLOG perform a variety of 
routine tasks, including versatile I/O 
operations. ADA PROLOG supports the 
MS-DOS 2.0+ directory structure, I/O 
redirection, and the predicates to perform 
file I/O for atoms, characters, strings, and 
numbers. 

Formatted floating point output is avail- 
able using the C language format rule. 
The UPDATE function permits updating 
of the resident memory data base by stor- 
ing it on the disk. Six optional I/O modes 
are available when files are opened. Both 
sequential and random access file I/Os are 
supported, including append and update 
options. 

ADA PROLOG'S modularity is similar 
to Modula-2's import and export facili- 
ties. Thus. PROLOG programmers can 
divide tasks and create nested libraries 
using treelike structured domains. Each 
domain can import and export predicates 
between multiplc-subdomains and a 
single-parent domain. Like MS-DOS 
structured file directories, domains also 
can be created, removed, and selected. 
Import and export predicates allow the 
interaction of domains. 

All benchmark tests were run on ADA 
PROLOG. The results show the current 
implementation to be the slowest of all 
those reviewed. 
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ConIX 

NOW ONLY $79.95! 

If you think you're missing out on innovative software 
developments because nobody is writing for CP/M™-80. take 
a look at us. We've adapted UNIX™ features to CP/M like 
never before, and with the kind of professional, quality- 
controlled product that you deserve. That product is none 
other than the critically acclaimed ConIX Operating System. 

ConIX can provide any 48K+ CP/M-80 or compatible system 
with I/O Redirection and Pipes (uses memory or disk). 
perfected User Areas. Command and Overlay Path Searching, 
Auto Screen Paging. 8Mb Print Buffering. 22 new SysCalls. 
Function Keys. "Virtual" disk system, Archiver (saves over 
50% disk), extensive command language. 300+ variables. 100+ 
commands, pull-down menu, and much more! Uses as little as 
1/2K RAM! Runs with CP/M for true data and software 
compatibility. Installs easily without any system mods! 

The ConIX package lists at $165 and has been advertised and 
sold internationally to many enthusiastic customers since 
October 1983. As a special limited offer, we've lowered the 
price of the complete ConIX system by 50% to only J79.95! 
Don't miss this opportunity to Bring your 8-bit micro back into 
the software revolution. Order your copy of ConIX today! 

Price includes manual. 8" disk, and user support. SA" conversions 
available. Contact your local dealer, or buy direct and add shipping: 
$*.50 UPS, $10 Canada. $25 overseas. NY residents add sales tax. 

Computer Helper Industries Inc. 

P.O. Box 680 Parkchester Station. NY 10462 
Tel. (212) 652-1786 (for information/orders) 

' 'We're helping your computer work better for you!" 
UNIX: ATfcT Bill Labs. CP/M; DipUl Reitirdi. ConIX: CompuUr Htlptr Ind, 
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OASYS 

TOOLKIT 
SNAP-SHOT 



C-68000 

CROSS AND NATIVE OPTIMIZING COMPILERS 
FOR 68000/1 (and 68020 SOON) 



OASYS offers a "ONE STOP SHOPPING" service for software developers in need of proven 8-, 16- and 32-bit cross and 
native tools for Unix and non-Unix 68000, 8086 and 32000 systems. Our critically acclaimed and widely used 68000 tool kit 
offers high quality, reliable, cost-effective tools. 

The OASYS 68000 tool kit consists of Green Hills compilers (C, Pascal and FORTRAN), our own M68000 Macro Assembly 
Development package, and dozens of other OASYS compatible support tools. Simply stated, we beat the competition on 
price, speed and tightness of emitted code. 



C-68000/10 

• Full K & R with Western Electric and Berkeley 
extensions 

• Complete run-time library available as 
source. No royalty if passed on. 

• Supports DEC & IEEE Floating Point 

• Integrated optimizer: 30% tighter code than 
Portable C; 4 times faster 

• Generates M.I.T. or EXORmacs assembly 
source code 

• Interfaces to all OASYS tools and Pascal, 
FORTRAN and PL/M-68K compilers 

• Ideal for cross development of boards with no 
OS, a kernel OS (e.g. VRTX, PSOS, MTOS), 
or Unix based 68000's 



68000/1 Assembly package Other tools 



• EXORmacs compatibile Macro 
Assembler, Linker, Librarian, and 
Cross Reference Utility 

• Generates S-records and a.o. 

• PiC and reentrant code 

• Used 2 years in house 

• Over 3,000 sold to date 

• Runs on VAX, Prime, PDP-1 1 , 
68000's, 8086/88 (PC) 

• Written entirely in C 
Coming soon 

• 68020 C and Cross assembler 



• Symbolic C Source Debugger 

■ 68000 Simulator 
& Disassembler 

• C Linecount and Time Profiler 
Utility (CLUE'") 

• LINT for VAX/VMS 

• Check Out compiler 
(SAFE-C™) 

• Communications tools 



OASYS 

60 ABERDEEN AVENUE 

CAMBRIDGE, MA 02138 

(617)491-4180 
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NEW FEATURES ") 

(Free update for our early customers!) 

• Edit & Load multiple memory 
resident files. 

• Complete 8087 assembler 
mnemonics. 

• High level 8087 support. 

Full range transcendentals 
{(an, sin, cos, arctan. 
logs and exponentials) 
Data type conversion and 
I/O formatting. 
» High level interrupt support. 
Execute Forth words from with- 
in machine code primitives. 

• 80186 Assembler extensions for 
Tandy 2000, etc. 

• Video/Graphics interface for 
Data General Desktop Model 10 




FORTH 



• Fully Optimized & Tested for: 
IBM-PC IBM-XT IBM-JR 
COMPAQ EAGLE-PC-2 
TANDY 2000 CORONA 
LEADING EDGE 

(Identical version runs on almost all 
MSDOS compatibles!) 

• Graphics & Text 
(including windowed scrolling) 

• Music - foreground and 
background 
includes multi-tasking example 

• Includes Forth-79 and Forth-83 

• File and/or Screen interfaces 

• Segment Management Support 

• Full megabyte - programs or 
data 

-■• Complete Assembler 

(interactive, easy to use & learn) 

• Compare 

BYTE Sieve Benchmark jan 83 

HS/FORTH 47 sec BASIC 2000 sec 
w/AUTO-OPT 9 sec Assembler 5 sec 
other Forths (mostly 64k) 70-140 sec 
FASTEST FORTH SYSTEM 

AVAILABLE. 
TWICE AS FAST AS OTHER 
FULL MEGABYTE FORTHS! 

(TEN TIMES FASTER WHEN USING AUTO-OPT!) 

HS/FORTH. complete system only: 5250. 

2H Visa Mastercard W 
Add $10. shipping and handling 

HARVARD 
SOFTWORKS 



I 



PO BOX 69 

SPRINGBORO, OH 45066 

(513) 748-0390 
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Chalcedony PROLOG V 

Put out by Chalcedony Software, this 
implementation adheres closely to the 
Clocksin and Mellish definition. The 
main benefit of such an implementation is 
that a novice PROLOG programmer need 
not worry about language extensions. 
PROLOG V is a good package to accom- 
pany the Clocksin and Mellish text and is 
certainly affordable. 

In PROLOG V, the user uses the > 
prompt to enter facts or ask questions in a 
simple and straightforward manner. The 
|F2| key on the IBM PC keyboard can be 
used to recall the last typed line. 

The PROLOG V implementation does 
not support floating point numbers. The 
manual explains that PROLOG is hardly 
viewed as a number-crunching language 
and deems (he floating point number sup- 
port omission as minor. PROLOG is more 
involved in fact manipulation. PROLOG 
V implements the Clocksin and Mellish 
data manipulation. I/O, and program trac- 
ing and debugging. 

Two problems were encountered while 
running the benchmark tests for this prod- 
uct. The PROLOG V determination 
allows tracing through decisions made by 
the compiler, but the manual does not 
explain how to turn this function off. In 
addition, stack overflow occurred during 
many tests. 

Expert Systems International 
PROLOG-1 

Expert Systems International's PROLOG- 
1 has an implementation that adheres 
closely to the Clocksin and Mellish defini- 
tion. PROLOG-1 displays the?- question 
prompt, making the system more acces- 
sible to user questions. To assert any fact 
from the keyboard, the asserrf), assertaQ, 
and assertzQ predicates must be used. 

PROLOG-1 supports alt PROLOG data 
types, including floating point numbers. 
Unlike ADA PROLOG, this imple- 
mentation does not provide transcendental 
and trigonometric functions. Conversion 
between integers and floating point num- 
bers is available, as are rounding and 
truncating reals. 

Built-in predicates are provided for 
altering and inquiring about internal sys- 
tem states, including execution tracing, 
user polling. I/O redirection, and error 
handling. The built-in clause editor is able 
to add, delete, list, and number predicates 
and allows for multiline definitions by 
putting a : prompt at the beginning of 
every continuation line. An I/O clause 
that saves definitions is also available. 

PROLOG-1 implements versatile file 
I/O, including the I/O predicates defined 
by Clocksin and Mellish. While 
sequential and random files are sup- 
ported, appending data to files is not. 
Random access is possible using the 
seek_read and seek_write predicates to 
select specific records. The geibyte predi- 
cate reads binary files, returning the 
ASCII code number of the byte read. 



PROLOG- 1 also allows for deleting 
and renaming files and making inquiries 
about the existence offiles. The inter- 
preter can be suspended, causing a break 
but preserving the context. A break can be 
achieved by using the break predicate or 
interrupts or through the occurrence of 
certain errors. Program abortion and 
restart can be achieved in the same ways. 

All benchmark tests were run with 
PROLOG- 1 . The results show the 
assembly-language-based implementation 
to be the second fastest. 

Expert Systems International 
PROLOG-2 

The implementation of Expert Systems 
International's new product was not avail- 
able for this review, but the manual was. 

PROLOG-2 is a superset imple- 
mentation of PROLOG-! and uses new 
nomenclature with substantial enhance- 
ments, ft is compatible with DEC 10. Two 
versions of PROLOG-2 arc on the distri- 
bution disk: one that supports windows 
and one that does not. 

The two primary parts of PROLOG-2 
arc the interpreter core and the program 
development satellite facilities. The latter 
can be customized by the end user. 
Besides the interpreter, the system core 
contains a memory allocator, garbage col- 
lector, module handler, window handler, 
system editor, error and help handler, 
expression cvaluator. and string handler. 
System state predicates are also provided 
to allow some control of the core system. 

Mass storage can act as an extension of 
the RAM through implementation of a 
virtual memory. A powerful editor that 
can alter modules, predicates, and clauses 
is also supplied. Windows can be used in 
conjunction with the editor, creating an 
editing window with predicates for cursor 
control and an execution window. 

A range of values from -8388608 to 
+ 8388607 is available through the sup- 
port of signed 24-bit integers. Floating 
point reals and strings are also supported. 
One interesting aspect of PROLOG-2 is 
that string constants can contain symbols 
for backspace, form feed, line feed, car- 
riage return, horizontal tab. double 
quotes, and backslash, all following the 
convention in C of the backslash being 
used with another letter. For example. 
"Hello \ nThcre World \ 7" will be dis- 
played with "Hello" on one line and 
"There World" on another, followed by a 
beep (ASCII 7 is the code for the bell). 
Strings also are supported in PROLOG-2. 



C Sick? 



PLZ is the cure! 

introducing a native code PLZ compiler 

for the 68000, featuring: 

D Complete PLZ language, including structure 
assignment and comparison 

□ Fully compatible with Zilog Z80, Z3000 PLZ 
D Ideal for embedded. ROM based systems 

□ Strongly typed 

□ Data types include signed and unsigned byte, word 
and longword 

□ All of the protection of Pascal, with the flexibility of C 
D Inherently more portable than either Pascal or C 

□ Easy for Pascal or C programmers to learn 
D Fully compatible with the CP/M-68K C library 



Requires CP/M-68K. Other systems and CPU's supported soon 

Package includes: All this for (J* 

the low *J> 
introductory 



6B000 Compilei^Cade generator 

User Manual 

Springer-Ver-lag 'Report on the 

Programming Language PLZ/SYS" P rlce OT Add S3 S/H NJ Residents 

One Year free updates includB B% sales "« 
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T^KCSystems 



YS ™s 20 Lamington Drive, Succasunna.NJ 0787B 



I £ 31(201)927-9104 



SPARRY BASIC-B COMPILER 



1. Floating Point Math 

2. Use all 640K of Memory 

3. Multiple Data Segments 

4. Multiple Code Segments 

5. Internal ISAM File support 

6. 4 Virtual Screens (Big Windows) 

7. Easy Assembly Language Interface 

8. Direct System Interrupt Calls 

9. A Compatible BASIC Compiler 

Req. PCDOS 2.00+ with 128K 

Sparry Software Labs 



P.O. BOX 632 
MILFORD, MA 01757 
617-473-5435 



( ) Compiler$159 
( ) DemoDisk$15 



PCDOS is a Trademark of 
International Business Machine Corp. 
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OASYS 

TOOLKIT 
SNAP-SHOT 



WIZARD 

C-8086 

CROSS AND NATIVE OPTIMIZING COMPILERS 



FOR 8086/87/88/186/286 



As part of OASYS' "ONE STOP SHOPPING" service for software engineering tools, we are proud to announce the addition 
of WIZARD C to our integrated collection of more than 50 professional programming tools (e.g. compilers, assemblers, 
linkers, debuggers, simulators & translators) for M68000, Intel 8086/80186 and NS32000 micros. 

WIZARD C benchmarks (against Lattice, Microsoft) prove that It is, by far, the most advanced, full featured, fastest, 
tightest, optimizing C compiler now available for cross and native (PC) development. Here's why . . . 



FEATURES 



SUPPORT TOOLS 



AVAILABILITY 



Complete K&R implementation plus 

V7, III extensions 

Supports 8087 Floating Point 

Built-in LINT 

Long, medium, short models 

190+ UNIX III functions — complete 

run-time library 

In-line assembly allowed 

100+ extensive warnings/diagnostics 

Intel and Microsoft compatibility at 

source and object levels 

Written in C — easily ported 

Comprehensive bound documentation 

Supports DOS 2.0. 2.1 , IBM/BIOS 



Symbolic C Source 

Level Debugger (CDEBUG™) 

100% Intel compatible structured 
Macro Cross Assembler, 
Linker/Locater and Librarian 

8086 Simulator 

Floating point math package 
(40+ functions) 

C Time Profiler (CLUE™) 
Checkout compiler (SAFE-C™) 

Comm. utilities for up/down 
loading to MDS, TEK, Microtek 



V 



W86CH-11/84 



NATIVE: PC/XT/AT using 

MS/DOS, PC/DOS (Xenix soon) 

CROSS: VAX/VMS, Bsd 4.1 , 4.2, III, V; 
8086's, 68000's (All Unison: III, V; 
ports); Callan, Masscomp, Sun, 
Pyramid, dozens more . . . 

Call for pricing, OEM, Site, Corporate, 
Source and Maintenance licensing 
information. 



OASYS 

60 ABERDEEN AVENUE 

CAMBRIDGE. MA 021 38 

(617)491-4180 
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RUN/C:™ 

Finally, 

a C Interpreter 

Available NOW for only $149.95 ! 

Finally, a painless introduction to 
the C language. With RUN/C: 
The C Interpreter you 

can create and run C language 
programs in an environment as 
easy to use as BASIC. 

RUN /C is C for the rest of us. 
It is a robust implementation of 
standard K&R. RUN/C is for 
both the beginner and profes- 
sional. 

RUN/C includes full floating 
point, 8087 support, structures, 
unions, casts and more than 100 
built-in C functions. 

With RUN/C you get all this 
with a command structure mod- 
eled after BASIC'S using familiar 
terms such as EDIT, RUN, LIST. 
LOAD. SAVE, TRON. SYSTEM, etc. 

Since RUN/C is a true inter- 
preter it means that C programs 
can be written, tested and run 
within a single protected envi- 
ronment, it is a teaching too! and 
a source code debugger. 

Here's more good news. . . 

• Great documentation: a 400- 
page, easy-to-read manual 
filled with executable 
programs 

• Array-index and pointer 
bounds checking 

• Variable-trace and dump 
diagnostics PLUS an integral 
program profiler 

• Full buffered and unbuffered 
file I/O 

• Printer and asynch support 

• Forking to your favorite full 
screen editor with automatic 
return to RUN/C with 
your edited program 

• System Requirements: 
IBM*' PC or compatible with 
PC-DOS 2.0 or MS" v -D0S 2.0 or 
greater with ANSl.SYS. 

Get things right the first time 
with RUN/C: 

The C Interpreter.™ 

For immediate delivery or more 
information, call: 

1-800-847-7078 
(in NY. 1-212-860-0300) 

or write: Lifeboat Associates 7 '" 
1651 Third Avenue 
New York, NY 10128 

RUN /C is a trademark of Age of Reason Co 



as are predicates for concatenating, 
inserting, deleting, and extracting strings. 

Each part of the satellite system is a 
module. There arc three types 
of modules: data, library, and pro- 
grams. Each can use virtual memory and, 
like the USCD p-sy.stem, can be swapped 
in and out of memory a.s required. Mod- 
ules can also contain external code written 
in other languages, assuming the interface 
conventions arc followed. The data mod- 
ules contain PROLOG data base informa- 
tion (that is. clauses). Program modules 
contain unalterable and private executable 
programs. Library modules are similar to 
program modules except that individual 
predicates can be loaded into the memory 
as needed. 

PROL0G-2 implements a versatile and 
powerful low-level I/O. Streams arc used 
to perform all I/O operations and must be 
created, opened, and then closed when no 
longer needed. Some streams, including 
special devices with names such as 
printer, reader, punch output, screen, 
keyboard, mouse, and glass-tly, are cre- 
ated automatically but still need to he 
opened. 

There are lour stream types: files, 
devices, user-defined streams, and win- 
dows. File streams are employed for I/O 
with DOS disk files. Sequential and ran- 
dom access I/O are supported. Device 
streams are related to the special devices 
previously mentioned. User-defined 
streams are required to handle I/O from 
nonstandard devices. Window streams are 
similar to the screen, but I/O is normally 
confined to a screen portion (that is. win- 
dow boundaries). PROLOG-2 has several 
predicates that set up. manipulate, and 
manage windows. 

Solution Systems 
PROLOG-86 

Two versions of this Solution Systems 
product (written by Micro-AI) are avail- 
able. One is designed for the novice PRO- 
LOG student. The other is primarily a 
development system. The implementation 
is close to the Clocksin and Mellish defi- 
nition, with a few changes. The distribu- 
tion disk includes Dean Scholobom's tax 
program. 

PROLOG-86 allows for the user to 
enter rules, questions, and commands. 
Rules are asserted by the period. Ques- 
tions can be asked either by typing ?-. fol- 
lowed by a question that ends with a 
period, or by typing the question and end- 
ing it with a question mark. Commands 
allow for the execution of a variety of 
statements, mostly I/O. without having to 
end with the usual PROLOG "Yea" or 
"Nea." 

PROLOG-86 allows the user to invoke 
a text editor. This can be specified by a set 
statement (for example, set EDITOR = 
<youredltor > ) in the CONFIG.SYS 
file, which sets up the environment for 
MS-DOS during the boot stage, or by 



using the PROLOG-86 predicate 
set_editortO make the necessarv selec- 
tion. Three predicates are involved. The 
(/predicate allows for a text file but does 
not force the PROLOG-86 interpreter to 
read it. The ed predicate allows the edi- 
ting of a text file containing PROLOG 
definitions. As the editing ends, the inter- 
preter reads the file to update the informa- 
tion in the data base. Errors are (lagged 
and the user is given an option to reedil or 
abort and restore the previous definitions. 
This is a powerful and interactive way of 
editing. The third predicate, em . removes 
(unloads) the current definitions in the 
memory before going into the editing 
process. 

PROLOG-86 supports floating point 
reals and transcendental, trigonometric, 
absolute, ceiling, floor, and square root 
functions. Theses functions are imple- 
mented as predicates but still act like 
functions in the sense that each function is 
not capable of implicitly becoming its 
reverse function. 

The 8087 numeric coprocessor chip is 
supported by a special PROLOG-86 ver- 
sion that is available on the distribution 
disk. Basic bitwise operations are also 
implemented, including bitwise AND, 
OR. XOR. left and right shift, and com- 
plements. PROLOG-86 defines if-then 
and if-ihen-else constructs using - >. This 
allows decision making and the selection 
of alternate action. 

PROLOG-86 also presents a number of 
additional functions. Among them is 
change_case(L,U) , which allows for a 
two-way upper-lower case conversion. If 
the /.variable is instantiated (initialized in 
PROLOGese). then the U returns the 
upper case atom. On the other hand, when 
U is instantiated the L variable returns the 
lower-case atom. 

Other PROLOG-86 predicates allow 
the user to perform screen cursor control, 
including clearing lines and screen and 
cursor positioning. The coiicat(List,Ait)in) 
predicate concatenates the list elements 
and produces a single atom. Its reverse 
predicate is name (Atom, List) . The 
length (List, Num) predicate returns the 
number of atoms in a list. 

The I/O operations supported by 
PROLOG-86 have the ability to invoke 
the MS-DOS command shell. In addition, 
the interpreter can be temporarily sus- 
pended so the user can go back to the 
operating system. The exit command 
issued in the operating system resumes the 
interpreter. MS-DOS structured file paths 
are not supported in this version, but 
deleting and renaming files is possible. 
The directory command allows the user to 
inspect active directories. 

All benchmark tests were run with 
PROLOG-86. The results show it to be 
the fastest. 
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Poor Person Software 

Introduces 

Write-Hand-Man 

Desk accessories for CP/M 

Write-Hand-Man lets you take notes, check phone 
numbers, make appointments, and countless other tasks 
without leaving Wordstar, dBase, Multiplan, or any other 
application. Enter Write-Hand-Man with a single key- 
stroke and choose the program you want. When you 
leave Write-Hand-Man, your application continues 
normally. 

$49.95 plus tax delivers Write-Hand-Man and 4 
companion programs; Notepad, Phonebook, Calendar, 
and Termcomm. User written programs are easily added. 
All you need is M80 or some other LINK-80 compatible 
assembler. 

Other CP/M products available from Poor Person Software: 
Poor Person's Spooler (549.95), Poor Person's Spelling Checker 
($29.95), Poor Person's Spread Sheet ($29.95), Keyed Sequential 
Files ($39.95), Poor Person's Menus ($29.95), aMAZEing Game 
($29.95), Window System ($29.95), Crossword Game ($39.95), 
Mailing Label Processor ($29.95). Shipping included. 

All products !v.:il.>E>i.- on IBM fl inch and NorthMjr 5 inch disks. Other S inch 
formats add $5 handling charge. No credit cards. 

Poor Person Software 

3721 Starr King Circle 

Palo Alto, CA 94306 

tel 415-493-3735 

CP'-'M is a registered Irademark oi Digilal Re&earcrv 
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C Programmers: 
File System Utility Libraries 

Source Code Included, No Royalties, 
Powerful & Portable. 

BTree Library $75*°° 

• High speed random and sequential access. 

• Multiple key: per data file. 

• Up to 16 million records per file. 

• Full documentation and example programs included. 



ISAM Driver 



$40. 



00 



Works with the BTree Library. 
Greatly speeds application development. 
Combines ease of use of database manager with flex- 
bility of programming language. 
Supports muiti key files and dynamic index definition. 
Very easy to use; fully documented; example pro- 
grams included. 



Both products 



Are written entirely in K&R C. 
Come with complete source code. 
Are free of any royalty charges. 



• S3.00 Shipping & 
Handling Charge. 



For more information call: 

softfocus 



Credit cards accepted. 



1277 Pallatine Drive 
Oakville, Ontario, Canada 
L6H 1Z1 
(416) 844-2610 

Dealer inquiries invited. 
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WRITE 

The Writer's Realty Incredible Text Editor lives up to its 
name! It's designed (or creative and report writing and 
carefully protects your text. Includes many features 
missing from WordStar, such as sorted directory listings, 
fast scrolling, and trial printing to the screen. All editing 
commands are single-letter and easily changed. Detailed 
manual included. Dealer inquiries invited. WRITE is 
S239.0O. 

BDS's C Compiler 

This is the compiler you need for learning the C language 
and for writing utilities and programs of all sizes and 
complexities. We offer version 1,5a. which comes with a 
symbolic debugger and example programs. Our price is 
(postpaid) S1 30.00. 

Tandon Spare Parts Kits 

One door latch included, only S32.50. 

With two door latches $37.50. 

Door latches sold separately for $7,00. 



All US orders are postpaid. We ship from slock on many 
formats, including: 8", Apple, Osborne. KayPro, Otrona, 
Epson, Morrow, Lobo, Zenith, Xerox. Please request our 
new catalog. We welcome COD orders. 



.►* ' As *0r. 



Workman & Associates 

1 12 Marion Avenue 
Pasadena, CA 91106 
(818) 796-4401 
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We Beat ALL 
Prices! 

LIST OURS 

Ascom 195 120 

C-Sprite 175 147 

Greenleaf communications 1B5 150 

Greenleaf Functions 185 150 

Harvard Total Project mgr. 495 320 

Instant C 495 400 

Lotus 695 375 

Lattice 500 275 

Lattice Windows 295 217 

Pfinish 395 275 

Pfix 395 275 

Piink 395 275 

Pmate 225 150 

Pre C 395 275 

Run C 150 120 

Crosstalk 195 120 

253 10th AVE. 

NEW YORK. N.Y. 10001 U.P.S. & FedX 212-989-7167 
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68000 

CO-PROCESSING 

For 

IBM PC, PC/XT 

and 

COMPATIBLE 

SYSTEMS 




Now you can add the MOTOROLA 68000 
16/32 Bil Processor to your PC via use of 
the Pro 68 Advanced Technology Co- 
processor, Enjoy all of the performance 
benefits of the 68000 processor without 
sacrificing your current PC system. Con- 
sider ihese impressive standard features 
of Pro 68: 

• High Speed MOTOROLA 68000 micro 
processor 

• 1 OMhz no wait state design (3 times 
faster than the IBM PC/AT) 

• True 16/32 bit technology 

• For use on IBM PC, PC/XT or compati- 
ble systems 

• On board 16 bit parity checked memory, 
256Kto1024K 

• Two serial I/O ports for multi user 
Interface 

• Provisions for the high speed NS32081 
math processor 

• High speed proprietary dual port host 
bus interface 

• Parallel or array processing via multi 
processor architecture 

• MS i PC DOS RAM disk driver program 

• Choice of two popular integrated 16/32 
bit operating systems: 

— CPM68K from Digital Research Inc. 

— Full suite of development tools 

— "C" compiler with floatsand 
UNIX I/O library 

— Many third party compatible 
languages and applications 

— OS9/6800 from MICROWARE 
Corporation 

— UNIX took alike with multi user/ 
multi tasking, shell, hierarchical 
disk directory, record and file 
lock, pipes and filters 

— Full suite of development tools 

— UNIXV compatible "C" compiler 

— Optional languages include 
BASIC, ISO PASCAL, FORTRAN 
77. 

Pricing from $1 195 includes Pro68 with 
256K, OS. and MS/PC DOS RAM disk 
driver. HSC also manufactures and mar- 
kets a full line of co-processors and 
RAM disks for use on Z80 based systems. 

DISTRIBUTORS: 

Australia-Computer Transition Systems 

...03-537-2768 
Great Britain-System Science 

...Q1-248-;0B2 
West Germany-DSC International 

...089-723-1125 
Canada Remote Systems 

...416-239-2835 

Dealer, Distributor and OEM inauirles 
invited. 



Hallock Systems Co.. Inc. 



267 North Main Street 
Herkimer, NY 13350 
(3151866-7125 



Logic Programming Associates 
Programming Logic Systems 
LPA-PROLOG (Micro-PROLOG) 

LPA-PROLOG (or Micro-PROLOG). a 

product of Logic Programming Associ- 
ates distributed in the U.S. by Program- 
ming Logic Systems, employs a some- 
what different syntax from thai discussed 
in the Ciocksin and Mcllish book. It fol- 
lows the more limited Micro-PROLOG 
variable name convention. Variable 
names must start with X. Y. Z, x, y, or z. 
The LPA Micro-PROLOG package 
includes a copy of K.L. Clark and F.G. 
McCabe's book Micro-PROLOG: Pro- 
gramming Logic, published by Prentice- 
Hall. 



Quintus PROLOG 

Quintus PROLOG, a product of Quin- 
tus Computer System Inc.. has an 
implementation similar to PROLOG- 
20. DEC 10 PROLOG, and C- 
PROLOG. It runs on the VAX scries 
under VMS. UNIX, and the UNIX 
68000-based Sun-2 workstation from 
Sun Microsystems Inc. 

This system provides both an inter- 
preter and a compiler. It can be inter- 
faced with the EMACS editor and uses 
windows to edit files and run PRO- 
LOG. An on-line help system is avail- 
able. Quintus PROLOG is menu 
driven and refers to documentation 
chapters. To interface with C. the user 
first prepares the required PROLOG 
facts and then calls the built-in predi- 
cate loadjoreign Jiles to load C func- 
tions into the running PROLOG 
system . 

Quintus PROLOG supports floating 
point reals, mathematics, and stream- 
based I/O. Strings are not supported. 
Many I/O predicates arc implemented 
to handle different data types and redi- 
rection, with improved handling of 
data base references. Other imple- 
mented predicates include keysort and 
sort for sorting and statistics to output 
various execution statistics. This sys- 
tem can access UNIX facilities by 
using the available UNIX predicate, 



LPA Micro-PROLOG supports a wide 
range of integers ( -99999999 to 
+ 99999999), floating point numbers, and 
strings in addition to other data structures. 
LPA Micro-PROLOG has the SUMO and 
TIMES0 predicates for doing addition, 
subtraction, multiplication, and division. 
Both predicates function in one of three 
ways: 

■ Result verification. For example, the 
SUM(10 1525) succeeds since 25 = 10 + 
15. while SUM(12 I 44) fails because 44 
is not equal to (12 + 1 ). 

■ Direct operation. SUMQ and T1MESQ 
are used to add and multiply, respectively. 
For example. TIMES(IOSx) gives x = 50 
and SUM(105x) gives .v = 15. 

■ Inverse operation. SUMQ and TIMESf) 
can be used to perform subtraction and 
division, respectively. Thus. TlMESdOx 
50) gives x = 5 and SUM(l00x 144) gives 
a = 44. 

LPA Micro-PROLOG offers predicates 
to manipulate and compare strings. The 
LESS predicate compares strings. 
STRINGOF packs list members into 
strings and vice versa. CHAROF returns 
the ASCII code of a character. LPA 
Micro-PROLOG also has type-checking 
predicates, which allow checking for 
numbers, integers, constants, atoms nam- 
ing a defined program, and variables. 
LPA Micro-PROLOG also implements 
the decision-making if-then predicate. 

Seven console I/O predicates- 
including those to read terms, display 
terms, pretty print, poll the keyboard for a 
pressed key, and reset the keyboard and 
type-ahead buffers— are also available. 
File I/O allows the user to read and write 
characters and text files. Random access 
and formatted file I/Os are also sup- 
ported. LPA Micro-PROLOG allows the 
console, printer, punch output, reader 
input, and keyboard to be treated as spe- 
cial I/O devices. Other supported file 
operations include logging to a new disk, 
erasing and renaming files, and obtaining 
the disk directory. 

Each LPA Micro-PROLOG module has 
five components: a name, an export list, 
an import list, a local dictionary, and the 
module program. Each module can export 
relations toother modules or programs. 
The local dictionary contains the list ofall 
local constants. Modules arc saved 
{SAVE} and loaded (LOAD) and are 
entered in a hierarchical, treelike struc- 
ture similar to the ADA PROLOG struc- 
ture. LPA Micro-PROLOG has four prim- 
itives related to modules: CMOD , which 
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C UTILITIES: 



PROGRA MME R DEVELOPMENT TOOLS 

J^ Li 51 Ours 

Brief By Solution Systems 195 Call 

Megamax C compiler for Macintosh 295 239 

PC Lint by Gimpel Software 100 89 

Prolog-86 by Solution Systems 125 Call 

Scientilic Subroutine Lib for C by Peerless 175 159 



C-terp Complete C Interpreter 

Full K&R C interpreter/semi-compiler which can 

access functions and externals compiled on various 

C compilers. Comes with a powerful, integrated 

screen editor providing a complete professional 

C programming environment. 

List Price $300 Our Price $269 



rarcrrenE 



dBC dBase/C Interface by Lattice 

dBC with source code 

ESP for C by Bellesoft 

Graphic by Scientific Endeavors 

Greenleaf C Functions Library ver3.0 

Greenleaf Comm Library 

Multi-Halo Graphics by Media Cybernetics .... 
PANEL Screen Designer ver. 6.0 by Roundhill .... 

Pasrn86 Macro Assembler by Phoenix 

Pfinish Performance Analyzer by Phoenix 

Pmaker Program Development Manager by Phoenix 

Pre-C Lint utility by Phoenix 

Safe C Dynamic Profiler by Catalytix 

Safe C Runtime Analyzer by Catalytix 

Windows For C by Creative Solutions 



250 
500 
Call 
250 
185 
185 
250 
295 
295 
395 
195 
395 
150 
400 
195 



Computer Innovations C-86 Compiler 

OeSmet C Compiler with Debugger 

Lattice C Compiler from Lattice 

Lattice C from Lifeboat Ltd Qty Special 

Mark Williams C Compiler w/Source Debugger 

Run/C Interpreter by Age of Reason Sale 

Safe C Standalone Interpreter by Catalytix 

Wizard C Compiler by Wizard Systems 

Xenix Development System by SCO 



395 
159 
500 
500 
495 
150 

Call 
450 

1350 



299 
145 
339 
275 
429 
99 

Call 
399 

1099 



TURBO PASCAL: 



Microsoft C Compiler version 3.0 

This entirely new version of Microsoft's C compiler 

features fast execution and compact code 

generation, small, medium and large memory 

models, Xenix compatibility, a linker and a librarian. 

List Price $395 Our Price $339 



OTHER LANGUAGES' 



8088 Assembler w/Z-80 Translator by 2500 AD . . . 100 89 

APL»PLUS/PC by STSC 595 469 

BetterBASIC by Summit Software 200 169 

Golden Common LISP by Gold Hill 495 Call 

Janus/ADA by R&R Software 900 699 

MASM-86 ver 3.0 w/utmties by Microsoft 150 119 

Modula-2/86 by Logitech 495 439 

Professional BASIC by Morgan Computing 99 89 

RM/Fortran by Ryan-McFarland 595 439 

C Power Paks From Software Horizons Call Call 

C-Sprlta Symbolic Debugger for Lattice C 175 159 

c-tree by FairCom 395 359 

C Utility Library by Essential Software Call Call 



C UTILITIES: 



Periscope Symbolic Debugger 

by Data Base Decisions 

Write-protect memory board and breakout switch 

allows instant recovery from runaway code. 

Provides on-line help, windowing, extensive 

breakpoints, dual monitor support and more. 

List Price $295 Our Price $269 



219 

459 
Call 
209 
139 
139 
199 
234 
259 
339 
179 
339 
Call 
Call 
139 



Screen Sculptor by Software Bottling 125 109 

Turbo ASYNCH by Blaise Computing 100 89 

Turbo GRAPHICS TOOLBOX by Borland Int'l 55 49 

Turbo PASCAL ver 3.0 by Borland Int'l Sale 70 49 

Turbo PASCAL w/8087 or BCD Sale 110 89 

Turbo PASCAL w/8087 & BCD Sale 125 99 

Turbo POWER TOOLS by Blaise Computing . New 100 89 

Turbo TOOLBOX by Borland Int'l 55 49 

Turbo TUTOR by Borland Int'l 35 29 

XTC Text Editor by Wendin 99 89 

EEEaaiEHIEEII 

Advanced Trace-86 by Morgan Computing 175 159 

APL2C by Lauer Software Interfaces APL to C 150 139 

Blaise Tools for C & Pascal Call Call 

Btrieve by SoftCraft 250 199 

Codesmith-86 Debugger by Visual Age 145 129 

Epsilon Emacs-like Text Editor by Lugaru 195 179 

FORTRAN Libraries by Alpha Computer Service Call Call 

Pflx-86 Plus by Phoenix 395 299 

Plink-86 Overlay Linker by Phoenix 395 299 

Pmate Macro Text Editor by Phoenix 225 159 

Polytron Products We Carry a Full Line Call Call 

Profiler by DWB Associates 125 89 

Xtrleve by SoftCraft 195 169 



ADVANTAGE #2 

At Programmer's Connection most popufar products are always In stock ready to be 
shipped. Most orders are on their way to you the same day they are placed. We know your 
time Is Important, that's why we tell you exactly when you can expect to receive your 
package. Maintaining an adequate inventory Is part of our philosophy of fast, 
efficient service. Call us — you'll discover that Programmer's Connection delivers 
products and service without delay. 

Discover the advantages of buying from Programmer's Connection: 

1. We offer the latest version of a product. 

2. Most popular products are in stock ready to be shipped. 

3. Receive same manufacturer's support as if buying direct. 

4. Experienced professional programmers are on staff. 

5. Choose from a large selection of the best software products available. 

6. Knowledgeable and courteous sales staff. 

7. Significant discounts off of retail prices. 

8. No extra charge on prepaid orders, including major credit cards. 

9. Reasonable charges for shipping and handling. 
10. Toll free services from Canada and the U.S. " "Programmers Serving Programmers' 





Programmer's 

136 Sunnyside Street Hartville, Ohio 44632 (216) 877-3781 (In Ohio) 
1 -800-336-1 1 66 Canada; 1 -800-225-1 1 66 

Call For Our Catalog 



ion 



U.S. 



Account is charged when ordei is shipped 
Pnces are subject to change wlhoul notice 
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'£ Journals 

The n Resource Journal for IBM d PC Programmers 




More than simply a 
computing magazine, 
Programmer's Jour- 
nal takes you deep 
into the art, technol- 
ogy, present and fu- 
ture of programming 
for the IBM PC. It's 
a tool, a resource 
and your voice in 
the constantly 
changing environ- 
ment of computer 
programming . 



PROGRAMMER 'S JOURNAL . 
IT'S YOUR SHOW. 



SHOWS you the tricks of the trade, revealing valuable tips and techniques 
for smoother, faster and more efficient computing . . . with working 
examples. 

PROVIDES you with a source code library, profiles of leading authors and 
software houses, program listings and unique features on the state of 
programming art. 

SUMS up important articles, books and pertinent research. 

BRINGS you timely features, inside information and gives you a forum for 
sharing your ideas. 

COVERS codes, applications, legal affairs, new products and more! 

REVIEWS program development tools and technological advances. 

TALKS your language, letting you take an active part in a programmer-to- 
programmer dialogue. 

SAVES vou valuable time! 



IBM and Personal Computer are trademarks of International 
Business Machines, Armonk, New York. 



BACK ISSUES 

Vol. 1, No. I: Norton Pascal I/O, Program Style Manual, 
COBOL, System Analysis, BASIC modules. Rounding error 
Vol. I , No. 2: Defining character sets, C86 BIOS calls, Cop] 
prorecrion, Pascal code, Input routines, Writing 
an Assembler. 

Vol. 1, No. 3: ASM dumb terminal, C source code, ASM 
graphics line drawing, Text editors reviewed, Utilities. 
Vol. 1, No. 4: Diskette directory via Pascal, MASM WHILE 
WEND, C/ASM interface, ASM stay resident routine, 
Structured programming. 

Vol. 1, No. 5: Multi-tasking software review. Transporting C 
Programs, Programmers calculator, dBase bargraphs, Utilities 

Vol. 1, No. 6: ASM printer configuration, DOS patch utility, 
Hi-speed graphics, Software ownership, dWINDOW review 

Vol. 2, No. 1: Freelance consulting, Sorts in C, Pascal text 
editor source code, Designing national database, Ultra utilities. 
Vol, 2, No. 2: Understanding C through Assembly language. 
Utility routines in C and Assembly, Music in C (using a C 
music program), Cornucopia of software development tools, 

Vol. 2, No. 3: Software development environments. Creating 
a productive screen handling tool, Generatinggraphics withir 
windows, Create, edit and play your musical ideas. Linking 
Assembler to Pascal and Basic. 

Vol. 2, No. 4: Writing a custom ROM BIOS for PC-DOS, 
The future of disk protection. Time-saving MASM Macros, C 
routines you can purchase. 

Vol. 2, No. 5: Scroll control using BASIC and Assembler, 
RTool, a PC-resident programmer's toolkit, Calling Assembh 
routines from dBase II, Pascal's pointer power. 
Vol. 2, No. 6: Periscope-Building a hardware board for the 
IBM PC, AT&T surprises all, dBase II to dBase III?, Intel 
80286 bugs by FNE, calendar functions for BASIC. 

Vol. 3, No. 1: November's Comdex, C - its uses and abuses, 
Using the C preprocessor, Memory segmentation examples, 
Index files{part 1), Stuctured programming language, Periscope, 
a symbolic debugger. 

Vol. 3, No. 2: UNIX, Artificial Intelligence, 
Pointers to functions, Ask/batch file utility, Index 
files (part 2), Scanning in Turbo Pascal, Calendar 
date routines in BASIC, Calculate record layouts 
automatically. 

Vol. 3, No. 3: NAPLPS and the professional pro- 
grammer. Uniforum, Instant C reviewed, Printer 
control from a batch file, Repositioning the stars in 
Starfinder, Reducing EXE file size through data 
positioning, Tools for better programming. 
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Zip 



Send me the following back issues: (Circle the issuefs) desired) 
$5.50eachU.S.,($6.50Canada, $8.50 Foreign, U.S. funds) 
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□ 1 year bi-monthly subscription: 
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D Check enclosed □ Bill me (subscriptions only) 

□ Charge my Bankcard: □ VISA □ MC 
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returns ihc name of the current module: 
CRMOD , which creates a new empty 
module and makes it the current module: 
OP MOD , which enters an existing mod- 
ule and makes it the current module; and 
CLMOD, which closes the current non- 
root module. 

For the benchmark tests, LPA 
Miero-PROLOG was run using the 
DEC 10 supervisor. This allowed the pro- 
crams to run without modifications. The 
list reversal and Tower of Hanoi tests ran 
successfully. The Sieve test gave "NO" 
for an answer instead of the list of primes. 
The Quicksort test caused stack-overflow 
errors. 

Logicware MPROLOG 

This Logicware product is characterized 
by the numerous predicates it contains and 
its support of modular programming in a 
manner very similar to Modula-2. It has a 
learning tool called LOGIC-LAB and a 
program development support system 
(PDSS). MPROLOG has almost enough 
predicates to warrant a separate review! 

MPROLOG has already been imple- 
mented on mainframes and mini- 
computers, so going to a microcomputer 
version meant few sacrifices in the PDSS 
and module implementations. The PDSS 
allows for the use of if, and, or, ".-", ", ", 
":", or ".■ ", *',". ",•" notations in assert- 
ing facts. MPROLOG does not support 
floating point numbers. The conditional 
if-lken-like- > is supported. 

MPROLOG only supports 24-bit 
integers, with numbers ranging from 
-8388608 to +8388607. 

MPROLOG has many predicates to 
check the type of expression, including 
digits, letters, characters, numbers, vari- 
ables, and nonvariables. Other predicates 
handle terms and perform tasks such as 
sorting, keysorting, list counting, and 
expression comparison. Expression com- 
parison is interesting because it allows the 
user to inquire about the relation between 
two expressions. The compare predicate 
is capable of returning relational oper- 
ators like < =■ . MPROLOG also has 
many data base-handling predicates to 
manage clauses, including adding, rena- 
ming, deleting, and inquiring about 
clauses. 

M PROLOG'S string manipulation 
predicates find the string length, extract 
substrings, concatenate two or more 
strings, convert between upper and lower 
cases, convert from ASCII code to char- 
acters, and remove blanks from strings. 

MPROLOG implements several error- 
handling and preventing predicates. Pre- 
venting predicates can extend the stack, if 
there is room, to allow more space for 
recursion. Protection against fatal errors 
can be turned on or off. 




Finally, A Lint and 
Make for MS™- DOS 



Get the full range of features C pro- 
grammers working in UNIX 11 " have 
come to expect from their Lint and 
Make utilities. With Prc-C™ you can 
detect structural errors in C programs 
five times faster than you can with a 
debugger. Find usage errors almost 
impossible to detect with a compiler. 
Cross-check multiple source files and 
parameters passed to functions. Un- 
cover interlace bugs that are difficult 
to isolate. All in a single pass. Capa- 
bilities no C compiler, with or without 
program analyzing utilities, can offer. 
Pre-C outlints Lint, since you can 
handle analyses incrementally. 

Pre-C's flexible library approach lets 
you maintain continuity across all 
programs in your shop, whether you 
use Pre-C's pre-built libraries, func- 
tions you already have, or some you 
might want to buy. 

Plus, you're not limited to one partic- 
ular library. Pre-C keeps track of all 
the libraries you're using to make 
sure that code correctly calls them. 

With Pmaker' M you can update and 
track every module in your program. 
When you make a change in any 
source or include file, all you do 



is run Pmaker. It will recompile 
changed modules and relink your 
program. With any compiler or linker 
you choose. Pmaker can update an 
object module library when one or 
several of the object modules are 
changed. You can use Pmaker to 
handle any task when a change 
requires several steps. 




Prc-C by Phoenix. $395. Pmaker 
by Phoenix. $195. 

Call (1)800-344-7200. 
In Massachusetts (617) 762-5030. 

Or, write: Phoenix Computer 
Products, Corp., 1420 Providence 
Hiehway, Suite 115, Norwood, 
MA 02062. 



{0<*^ 



PROGRAMMERS ' PFANTASIES"' BY PHOENIX 



Programmers' Pfantasies. Pre-C. and Pmaker are trademarks of Phoenix Computer Products Corporation. 
MS <s a trademark o! Microsoft Corporation. UNIX ts a trademark ol AT&T Bell Laboratories. 
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MPROLOG also implements predicates 
to get the date and time. The predicate 
system _state(Indicator, Value) allows for 
system control. Indicator specifies what is 
to be controlled and Value sets its state or 
value, including turning garbage col- 
lection, list notation, mixed and nor- 
malized cases, and tail recursion. The 
indicator also sets the minimum free space 
that is left in the global, main, and trail 
stacks that could trigger an error. In addi- 
tion, the indicator can include CPU time; 
elapsed processor time for garbage col- 
lection; time. date, and storage allocation 
for the stack; and what tables have been 
used. 

I/O predicates in MPROLOG are 
extensive and proliferated. I/O redirection 
is supported. The reading predicates 
allow a variety of items to be read, such as 
mathematical and nonmathematical 
expressions, end of lines, end of files. 



comments, records, and symbols. Output 
predicates allow the user to write expres- 
sions, print tabs, create new lines, and do 
spacing. Predicates that inquire about out- 
put column location and available space 
are on the same line. 

One of the highlights of MPROLOG is 
the module implementation. Each module 
has a name, interface specification, decla- 
rations, comments, predicate definitions, 
and program goals. Modules also can 
import and export predicates between one 
another, as in Modula-2. According to the 
instruction manual, the current version 
has many features missing in the PC/MS- 
DOS implementation. 

The benchmark programs could only be 
run after converting them to modules. 
MPROLOG showed a slight advantage 
over the other products in the Quicksort 
test. The other tests reflected its moderate 
speed. H 



Realia COBOL 



What to do while 
your COBOL programs 
compile and execute: 



-■-.-- 

■ ■'■■ ■ ■-■■'"■■ 



1. Wait. 

2. Wait some more. 

3. Stop waiting. Call Realia, 



PROLOG products and 
manufacturers 

Arity/PROLOG— S 1 ,950 comp/inler 
Arity Corp. S495 interpreter 

336 Baker Ave. 
Concord, Mass. 07142 
(617)371-1243 

ADA PROLOG-S300 
Automata Design Associates 
1570Arran Way 
Dresher, Pa. 19025 
[215)646-4894 

PROLOG V-S69. 95 

Chalcedony Software 
5580 La Jolla Blvd., Ste. 126 
LaJolla, Cafif. 92037 
(619)483-8513 

PROLOG- 1-S395 

PROLOG-2-Sl,895 

Expert Systems International 

1150 First Ave. 

King of Prussia, Pa. 19406 

(215)337-2300 

LPA-PROLOG (Micro-PROLOG)-S250 
Logic Programming Associates 
Programming Logic Systems (distributor) 
31 Crescent Dr, 
Milford, Conn. 06460 
(203) 877-7988 

MPROLOG-S725 

Logicware 

5000 Birch St., West Tower 

Ste. 3000 

Newport Beach, Calif. 92660 

(714)476-3634 

Quintus — Sun: 58,400-514,280 
Vox: 56,600-521,800 
Quintus Computer Systems Inc. 
2345 Yale St. 
Palo Alto, Calif. 94306 
(415)494-3612 

PROLOG-86-S125 
Solution Systems 
335 Washington St. 
Norwell, Mass. 02061 
(800)821-2492 



Patience isn't always a virtue. 
Realia COBOL is fast: 



Compilation Speed 
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Sieve of Erato&lhene * ^'^T-.C^'E" 



Realia COBOL is written in COBOL. We oner you the 
tool? we use ourselves: 

• Our fOLLOVV-THE-50URCE r " interactive symbolic 
debugger. Works with normal native code. 

• A speedy full -screen editor t hat handles very large files. 
. Mainframe IBM V5 COBOL compatibility. 

* Interfaces lo Assembler and C. 

■ Mo royally or run-lime fee. 

■ Mo limil on program size, up to available memory. 

• In our new release, no need to insert the product 
diskelle when you're using a hard disk. 

Realia COBOL costs $99$. Qualified companies can 
Iry it for free. Call us. And ask about our other 
products, Spacemaker'" and Termulalor'", 



What are you 
waiting for? 



10 South Riverside Plaza 
j Chicago, Illinois 606O6 
(3 12) 346-0612 
TELEX: 332979 (REALIA IflO 
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STRUCTURE FOR BASIC 

u . ,. PROFESSIONAL PROGRAMMING 



ENU I RONHENT 




WORKS WITH 

BASICA 

I NTERPRETER 

COMPI LER 

FULL ERROR 
LOGC1NC 
PROGRAM 
LISTER 



BENDORF 

ASSOCIATES 

61306 S. MAIN 

P.O. BOX 5910 

ROSNELL, NM 

BBZ01 
505 34T-5701 

U ISA /MASTERCARD 



LABELED 

PROCEDURES 

MACROS 

SUE-ROUTINES 

LIBRARIES 

1149.951 



BNQSOL4 

* oaky m.% 

This exceptionaS language wtll amaze you with its 
versatility- Compatible with main-frame 
SNDB0L4. use it at work and hnme Performthuse 
complicated programming jabs and prototype ynur 
exotic ideas quickly This robust implementation 
supports large memory model. 8OB70f float de- 
sired), 32 bit integers. 3£K strings Includes 60 
page reference guide and sample programs includ- 
ing ELIZA You can also get Gnswold's et al defini- 
tive "green" book or even the source code. Needs 
IBM PC or BDBB/BS. s12BK. IBM or MS DDS 

Guide + 5Va- BSDD diskette S44 95 

Guide + diskette - "green' book £59.95 

"Green" bock only S24.95 

Source code and license $500 00 

Prices postpaid, in NY state add sales tax. 

S 014)271-5855 S — 

BERSTIS INTERNATIONAL 
P.O. Box 441 

MILLWOOD, NY 1D54G USA 



lOQ/ LTUyperon ciyoftware 

Specializing in innovative programming 
tools. 

■ Complete documentation and 
C-source provided (presently DOS 
only). 

■ Reasonable prices. 

■ High quality and good 
performance. 

Products currently available: 

C Preprocessor. Features include 
variables and expressions, loops, 
and full macros. Price — S39.95. 

General purpose editor Line oriented 
commands with a screen oriented 
submode. Command window. Price 
- S29.95 

Order Irom: 

HYPERON SOFTWARE 

P.O. Box 3349 
Costa Mesa. CA9262S 

Enclose check or money order. California 

residents add 6%. 

2532 Orange Ave.. Costa Mesa. CA 
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Jit Advanced 

▼ Trace86™ 



Symbolic Debater 4 Assembler Combo 

• Full-screen trace with single stepping; 
Even backstepping' 

• Write & Edit COM & EXE programs 

• Conditional breakpoints (programmable) 

• Switch between trace and output screen; 
Or set up two monitors 

• B087. 60136. 80286. 80287 support 

• Write labels fi comments on code 

• Polish hex/decimal calculator 

• and mere . . . Priced al $175.00 

To order or request more information contscr 

"WjfF Morgan Computing Co., Inc. 

» ---■ PO Boi 112730. Dallas. TX 75QI1 

(214] 245-4763 
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Pnscnl-to-C Translator. Convert UCSD 
Pascal, MT+ Pascal, and others to KE.R C. 
Handles nested procedures, intrinsic 
functions, separately compiled units and 
modules, all data types including long 
integers. Requires 256K IBM PC/XT/AT. Send 
for free samples or send us up to 500 lines 
of Pascal and we will convert it for you for 
FREE. Licensed source and executable code 
15,000, conversions 25 cents/line. 

TGL Inc. 

4400 Sulphur 5prings Rd. 
Corvollis, OR. 97330 
(503)-745-7476 



FLOWCHARTER 



Interactive EasyFlow is a fullblown, on-screen 
flowchart processor with advanced features. This 
is a program dedicated to flowcharts & organiza- 
tion charts, not a general-purpose graphics pro- 
gram that makes you do most of the work. 

♦ automatic line routing • automatic text cen- 
tering within shapes * charts up to 16 shapes 
wide by 16 shapes high ■ three levels of zoom 
{close-up, normal, wide-angle) • horizontals ver* 
tical scrolling within the chart * 1B standard 
flowcharting shapes included * user defined 
shapes easiiy added • wide charts can be printed 
in strips ■ complete, well written manual ■ works 
with all printers • requires a PC-DOS or MS- DOS 
machine with IBM compatible graphics adapter 
& 256K. 

OnlyS149.95 + S2.00 s & fl. 

HavenTree Software Limited 
P.O. Box 1093-D 

Thousand island Park, NY 13692 
(613) 542-7270 Extension 82 
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^CONTROL SYSTEMS SOFTWARE ENGINEER 1 

A Challenging Opportunity in our Horidi Corporis Mllcei 
RS&H olfeis a challenging position wilh responsi- 
bility for development ol systems level and applica- 
tions level software lor various Industrial Procesa 
Control applications. 

Responsibilities will include involvement in associ- 
ated hardware, and control strategy design, but a 
strong systems soMwaie background is the primary 
requirement 

Candidates should nave at least Ihree years experi- 
ence and a strong working knowledge of at leasl one 
computer operating system, assembly language 
and ' C" Familiarity with various DEC equipment 
operating systems, C" and MACRO is particularly 
desirable Experience with development ol real- 
time software wilh some Process Control'lnstru- 
meniation background is desired A BS degree <n 
Computer Science or Engineering is a minimum re- 
quirement 

RSAH is a rnuiti-diSCiplmed A-'E'P lirm witu a *3 
year reputation tor innovative technology applica- 
tions and professional development RSAH offers 
an aiiracuve salary and bene'its package including 
_ a prime Florida location providing a quality o' ii'e 
^L second to none Please send your resume m com- 
^B^^pieie confidence including salary history 
|VA Thorns* hi Hill* {904) 739-2000. 

WA 



REYNOLDS, SMITH AND HILLS 

Arch!lecli-£ngin«r»-Planner!. Ine 
CO Bon 4B50 
f\ Jacksonville. FL 32201 
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RSAH encourages qualified minorities women 
weterans and h andicapped individuals to apply J 
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OPT-TECH SORT 



SORT/MERGE Program tor the 
IBM-PC, XT, AT & Compatibles 
Btrieve Files Now Supported 

• Written in assembly language for high pertomance 
Example: 4,000 records ol 128 bytes sorted to grve key 

& pointer file in 30 seconds COMPARE! 

• Sort ascending or descending on up to nine fields 

• Ten input files may be soned or merged at one time 

• Supports many file structures & data types 

• Rlesize limited only by your disK space 

• Output He can be full records, keys or pointers 

• Can be run from keyboard or as a batch command 

• Can be called as a subroutine to many languages 

• Easy to use — Fully documented 

• S99 - VISA. M/C, Check. Money Order. COD, or PO 
Quantity discounts and OEM licensing available 

To order or to receive additional information 
write or call 

OPT-TECH DATA PROCESSING 

P.O. Box 2167 Humble, Texas 77347 
(713) 454-7428 
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FORTRAN 

PROGRAMMERS 

Discover why 

you should be using 

F77L 

the complete implementation 

of the ANSI FORTRAN 77 
Standard for the IBM PC and 

compatibles. 

If you are serious about your 

FORTRAN programming, you 

should be using F77L. 

$477 

Lahey Computer 
Systems, Inc. 

31244 Palos Verdes Drive West. Suite 243 
Rancho Palos Verdes, California 90274 

1213) 541-1200 

Serving the tORTRAS community 

since 1969 
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ORDER COMPUTER LANGUAGE 
BACK ISSUES - WHILE THEY LAST! 




PREMIER 



The biggest collector's 
Issue 

• Basic Becomes a 
Structured Language — 
by Kemeny & Kurtz 

• Programming in the UNIX 
Environment 

• COBOL: Pride and 
Prejudice 

• Exploring Ada and 
Modula-2 

Exotic Language: 

SNOBOL 
Interview: Charles Moore 



$&>& 




FEBRUARY '85 

C Language Special 
Issue 

• Twenty-One C 
Compilers Compared 

• The Standardization of 
C 

• C to Assembly 
Interface 

Exotic Language: MUMPS 
Interview: P.J. Plauger 



• An Implementation 
Demonstrating C 
Portability 

• The Evolution of ZCPR- 
Part I 

• BATCH— A Powerful IBM 
"Language" 

Exotic Language: PILOT 
Interview: Donald Knuth 



fSS^K^ 




MARCH '85 

• Modifying MS-DOS 
Device Drivers 

• Hashing out FORTH with 
Charles Moore 

• Programming Macros in 
C (Debugging) 

• Sol Libes Covers 
Multiprocessing Systems 



NOVEMBER '84 



• Enhancing Source Code 
Control under UNIX. 
Port I 

• Natural Language 
Processing and LISP 

• Building Portable 
Programs 

Exotic Language: 

OCCAM 
Interview: Gary Kildall 



DECEMBER '84 

• Exploratory 
Programming 

• Fred: A Language 
within Framework 

• Six Pascal Compilers 
Compared 

Exotic Language: OMNI 
Interview: Bill Godbout 



JANUARY '85 

• Macros and Procedures 

• Extensibility in Forth 

• The lllrd Dimension- 
Programming in dBASE 
III 

Exotic Language: 

Transaction Application 

Language 
Interview: Sol Libes 




APRIL '85 

• Recursive Procedures 

• Sorting by Dispersion 

• COBOL Compiler 
Analysis 

• C on the Macintosh 
Exotic Language: APT 
Interview: Gordon 

French 



MAY '85 

Exclusive Interview: 
Niklaus Wirth and 
Donald Knuth 

• Twenty-nine BASIC 
Interpreters and 
Compilers Compared 

• Macros In BASIC 
Exotic Language: 

Clascal 



JUNE '85 

• Forth: Twithe Curthed, too! 

• Porting the UNIX Utilities 

• Symphony Command 
Language 

Exotic Language: COMAL 
Interview: Ward 
Chrisfensen 



Only a limited quantity 
of magazines is 
available, so order 
today. To receive your 
back issues, just fill 
out this coupon 
and mail it back with 
a check for $5.00 per 
issue. 



Foreign orders : Add S3 00 for 
airman. 



Premier 
Oct. '84 
Nov. '84 
Dec. '84 
Jan. '85 
Feb. '85 
Mar. '85 
Apr. '85 
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Jun. '85 



copies XS5.00= S 
copies XS5.00= S 
copies XS5.00= S 
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ADDRESS . 



CITY. STATE. ZIP 



Send payment and coupon to: 

COMPUTER 



LANGUAGE 

Back Issues 

131 Townsend St. 

San Francisco, CA 94107 



Creators of 

COMPUTER LANGUAGE 
Sponsor the C Expert Forum 




gs&&* 



Never before have so many leaders in the C pro- 
gramming field gathered for one event. The C Seminar/ 
Workshop will be an exciting forum on the latest technica 
innovations and C language developments. Best of all, you'll experience a practical, hands- 
on approach in small workshop sessions. All this in the beautiful autumn foliage of New 
England, just four blocks from Harvard Yard. The C Seminar/Workshop is brought to you by 
the publishers of COMPUTER LANGUAGE. 

The cost for this comprehensive 2'/2 day event is only $695. Sign up by June 30th and 
receive a $100 early bird discount. 



CURRICULUM 

Speakers 



Jim Brodie, ANSI C committee chairman-. Overview of the ANSI Standardization Effort 

P.J. Plauger, author, ANSI C committee secretary: Programming Style and C 

Larry Rosier, ANSI C language chairman: Language Standardization Issues 

Tom Plum, author-. Efficiency of C Programs 

Heinz Lycklama, /usr/group UNIX chairman-. UNIX Perspective on C 

Leor Zolman, compiler writer: Porting C Programs between Operating Systems 

Robert Ward, C User's Group coordinator: Structured Methods of Debugging C 



Workshops Seminar participants will be able to choose four from this list: 



(Subject to change 

based on 

availability) 



Debugging Techniques 

Interpreters in a Development Environment 

Programming for Portability 

Efficient Code Generation 

Cross Compilers 

Network Data Base Theory and C 

Object-File Formats for UNIX Systems 

Philosophy and Methodology of Benchmarks 



ANSI Standards: Questions & Answers 
Code Readability and Organization 
Asynchronous Communications 
Writing Extensions to C 
C / UNIX System Subroutine Interfaces 
Porting C between CP/M, MS-DOS, and 
UNIX 



C Seminar/Workshop Registration Form 



X 



Please enroll me in the C Seminar: 

D Early Bird $595 (pay by 6/30/85) 
D Single $695 
D Multiple 

(3 or more enrollments get $100 discount) 

□ I do not wish to enroll at this time but 
please send me more information. 

Method of Payment: 

□ Check Enclosed 

□ Bill My Company 



Make check payable to: 
C.L. Publications Inc. 



Name & title . 
Name & title. 
Name & title. 

Company 

Address 



City, State, Zip . 
Phone 



EA65 



COMPUTER LANGUAGE Seminar 
131 Townsend St. 
San Francisco, Calif . 94107 
(415) 957-9353 
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D Yes, start my Subscription to COMPUTER LANGUAGE today. The cost 
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aztec The Most Powerful C 



for the IBM AT • MACINTOSH • MS DOS • CP/M-80 • ROM APPLICATIONS 
IBM PC/XT • APPLE // • CP/M-86 • TRSDOS • CROSS DEVELOPMENT 



Why Professionals Choose Ajlec C 

AZTEC C compilers generate fasl, compact 
code. AZTEC C is a sophisticated development 
system with assemblers, debuggers, linkers, 
editors, utilities and extensive run time libraries. 
AZTEC C is documented in detail. AZTEC C is 
the most accurate and portable implementation 
of C for microcomputers. AZTEC C supports 
specialized professional needs such as cross 
development and ROM code development. 
MANX provides qualified technical support. 

AZTEC CBB/PRO 
— for the IBM AT and PC/XT 

AZTEC CB6/PRO provides the power, portabili- 
ty, and professional features you need to 
develop sophisticated software for PC DOS, MS 
DOS AND CP/M-86 based microsystems. The 
system also supports the generation of ROM 
based software for 8088/8086, 80186, and 80286 
processors. Options exist to cross develop ROM 
code for 65xx, 8080, 8085, and Z80 processors. 
Cross development systems are also available 
that target most micro computers. Call lor infor- 
mation on AZTEC C86/PRO support for XENIX 
and TOPVIEW. 



POWERFUL - AZTEC C86/PRO 3.2 outper- 
forms Lattice 2.1 on the DHRYSTONE 
benchmark 2 to 1 for speed (17.8 sees vs 37.1) 
while using 65% less memory (5.8k vs 14k). The 
AZTEC C86/PRO system also compiles in 10% 
to 60% less time and supports fast, high volume 
I/O. 



PORTABLE — MANX Software Systems pro- 
vides real portability with a family of compatible 
AZTEC C software development systems for PC 
DOS, MS DOS, CP/M-86, Macintosh, CP/M-80, 
APPLE // + , lie, and lie (NIBBLE - 4 apple rating), 
TRSDOS (80-MICRO - 5 star rating), and Commo- 
dore C64 (the C64 system is only available as a 
cross compiler - call for details). AZTEC 
C86/PRO is compatible with UNIX and XENIX. 



PROFESSIONAL — For professional features 
AZTEC C86/PRO is unparalleled. 

• Full C Compiler (8088J80B6 • B0186 - 80286) 

• Macro Assembler for B0B8/8086/80 186/80206 

• Linkage Editor with ROM support and overlays 

• Bun Time Libraries ■ object libraries + source 
DOS 1.x; DOS 2.x; DOS 3.x; screen I/O; Graphics; 
UNIX I/O; STRING; simulated float; B087 support; 
MATH; ROM; CP/M-86 

• Selection of 8088/8086, 80186, or 80286 code genera- 
tion to guarantee best choice lor performance and 
compatibility 



• Utility to convert AZTEC object code or libraries to 
Microsolt format. (Assembly + conversion takes 
less than halt the time as Microsoft's MASM lo pro- 
duce MS object) 

• Large memory models and sophisticated memory 
management 

• Support products for graphics. DS, Screen, & ... 

• ROMablecode + ROM support + separate code and 
data + INTEL Hex Converter 

• Symbolic Debugger & Other Utilities 

• Full Screen Editor (like Vi) 

• CROSS Compilers arB available to APPLE //, Macin- 
tosh, CP/M-80. TRSDOS, COMMODORE C64, and 
ROM Cased 65xx, and 8080/8085/Z80 

• Detailed Documentation 

AZTEC CB6/PRO-AT S500 

(configured lor IBM AT ■ options for 8088/8086) 

AZTEC C86/PRO-PC/XT $500 

(configured for IBM PC/XT - options lor 80186/80286) 

AZTEC C86/BAS includes C compiler (small model only), 
8086 MACRO assembler, overlay linker, UNIX, MATH, 
SCREEN, and GRAPHICS libraries, debugger, and 
editor. 

AZTEC CB6/BAS $199 

AZTEC CB6/BAS (CP/MB6) $199 

AZTEC C86/BAS (DOS 4 CP/M-86) S299 

UPGRADE to AZTEC C86/PRO S310 

CTREE Database with source $399 

CTREE Database (object) S149 

CROSS COMPILERS 
Cross Compilers lor ROM, MS DOS. PC DOS, or CP/M-86 
applications. 

VAX - >B086/B0xxx cross $5000 

PDP-1 1 ■ > B066/80XXX cross $2000 

Cross Compilers with PC DOS or CP/M-86 hosts are $750 
lor the first target and $500 for each additional target. 
Targets: 65xx; CP/M-80; C64; 8080/8085/Z80: Macintosh; 
TRSDOS; 8086IB0B8/80186/B0286; APPLE II. 



AZTEC C68K 
— toi the Macintosh 

For power, portability, and professional features 
AZTEC C68K-C is the finest C software development 
system available for the Macintosh, 

The AZTEC C68K-C system includes a 68000 macro 
assembler, a linkage editor, a source editor, a mouse 
based editor, a SHELL development environment, a 
library of UNIX I/O and utility routines, lull access and 
support ot the Macintosh TOOLBOX routines, debug- 
ging aides, utilities, make, dill, grep, TTY simulator with 
upload 6 download (source supplied), a RAM disk (tor 
512K Mac), a resource maker, and a no royalty license 
agreement. Programming examples ar included. (Over 
600 pages of documentation). 

AZTEC C68K-C requires a 128K Macintosh, 
and two disk drives (frugal developers can make 
do with one drive). AZTEC C68K supports the 
512K Macintosh and hard disks. 

AZTEC C68K-C (commercial system) $500 

AZTEC C68K-P (personal system) $199 

AZTEC C68K-plo AZTEC C68K-C upgrade .$310 



Mac C-tree database $149 

Mac C-tree database with source $399 

Lisa Kit (Pascal to AZTEC C68k object convener) . .$ 99 



AZTEC C65 

— for (he APPLE // 

"...The AZTEC Csystem is one ol the lines! software 

packages I have seen..." NIBBLE review, July 1984. , 

The only commercial C development system available 
that runs native on the APPLE II + , lie. and lie, the 
AZTEC C65 development system includes a full floating 
point C compiler compatible with UNIX C and other 
MANX AZTEC C compilers, a 6502 relocating assem- 
bler, a linkage editor, a library utility, a SHELL develop- 
ment environment, a full screen editor, UNIX I/O and 
utility subroutines, simple graphics, and screen func- 
tions. 

AZTEC C65 (Apple DOS 3.3) , $199 

AZTEC C65/PRO lApple DOS + ProDosj $350 

(call for availability) 



AZTEC C ll/PRO 

— for CPJM 80 

The first member of the AZTEC C family was the 
CP/M-B0 AZTEC C compiler. It is "the standard " com- 
piler for development on CPJM-80. The system includes 
the AZTEC CMC compiler, an 8080 assembler, a linkage 
editor, an object librarian, a full library of UNIX I/O and 
utility routines, CP/M-B0 run time routines, the SMALL 
library (creates modules less than 3K in size), the fast 
linker for reduced development limes, the ROM library, 
RMAC and M80 support, library source, support for 
DRI's SID/ZSID symbolic debugger, and more. 

AZTEC C ll/PRO $349 

AZTEC CII/BAS $199 

CTREE Database with source $399 

CTREE Database in AZTEC object form $149 



AZTEC C80 
— for TRSDOS (Radio Shack Model III & 4] 
■ I've had a lot ot experience with dillerent C compilers, 
but the Aztec C80 Compiler and Professional Develop- 
ment System is the besl I've seen." SO-Micro. Decem- 
ber. 19B4. John B. Harrell III 

This sylem has most of the features of AZTEC C II tor 
CP/M, It is perhaps the best software development 
system for the Radio Shack Model 111 and IV. 

AZTEC C80 model 3 (no Moating point) $149 

AZTEC C80 model 4 (lull) $199 

AZTEC CB0/PRO (full lor model 3 and 4) S299 

To order or lor information call 

800-221-0440 

IJOl) 53Q 7997 (NJ and outside USA). Or write. MANX 
SOFTWARE SYSTEMS PO Box 55. Shrewsbury, N.J. 
07701 



MANX 

TRS 80 RADIO SHACK TRS DOS IS a trademark ol TANDY 
APPLE DOS MACINTOSH is a trademark ol APPLE. 




SHIPPING INFORMATION ■ Standard U.S. 
shipment is UPS ground (no fee). In the U.S. 
one day shipment is $20, two days is $10. 
Canadian shipment is $10. Two days ship- 
ment outside ihe US. is by courier and is 
freight collect. 



For Technical Support 
(Bug Busters) call; 201-530-6557 
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Speed, Power, Price. 






Borland's Turbo Pascal Family. 



The industry Standard. With more than 250.000 users worldwide Turbo Pascal is the industry's de facto standard 
Turbo Pascal is praised by more engineers, hobbyists, siudens and professional programmers than any otter development 
envi ronment in the history ol microcomputing. And yet, Turbo Pascal is simple and fu n to use' 

Jell Ountemann. PC Magazine: language deal ol the century . . Turbo Pascal: II introduces a new 
programming environment and runs tike magic. " 

Oain Garland. Popular Computing: 'Most Pascal compilers barely lit on a disk, but Turbo Pascal packs an editor, compiler, linker 
and run-lime library into lust 29K bytes ol random-access memory " 

Jerry Pourtielle, BYTE: What I think the computer industry is beaded tor: net! documented standard, plenty olgocxt features, 
and a reasonable price' 

Portability. Tu rbo Pascal is available today tor mosl computers running PC DOS. MS DOS, CP/M 80 or CP/M 86. A XENIX venson ot Turbo 
Pascal will soon be announced, and before the end ol the year. Turbo Pascal will be running on most 68000 based microcomputers. 





High resolution monochrome graphics for the IBM PC and the Zenith 100 computers 

Dazzling graphics and painless WindOWS. The Turba Graptiix Toolbox will grve even a beginning pFDoramitier 

the experts edge. It's a complete library ol Pascal procedures that include 

—Full graphics window management. 

-Tools that wis allow you to draw and hatch pie charts, bar charts, orcles, rectangles and a lull range of geometric shapes 
Procedures that will save aid restore graphic images to and from disk- 
— Functions that will allow you to precisely plot curves. 

—Tools that will allow you to create animation or solve those difficult curve fitting problems. 
and much, much more 

No Sweat and no royalties. You may incorporate pan. or all of these tools in your programs, 
and yet. we wont charge you any royalties. Best ot all. these functions and procedures come complete 
with commented source code on disk ready to compile! 







Searching and sorting made simple ^ 

The perfect Complement to TurbO Pascal. It contains, Turbo-Access, a powerful implementation of the state-of-the-art B+tree ISAM 
technique: Jbrbe-Sort. a super elficienl implementation of the fastest data sorting algorithm. "Quicksort on disk" And much more. 




Jerry Pourneile, BYTE: The tools include a b- 

as well thought out. sell for hundreds ol dollars.' 



tree search and a sorting system; I ve seen stuff like this. Out not 




Get Started right away: free database! Included on every Toolbox disk is the source code to a working 
data base which demonstrates how powerful and easy lo use the Turbo-Access system realty I: 
Modify if to suit your individual needs or just compile it and n 

Remember, no royalties! 



From Start to Finish in 300 pages. Tutbo Tutor 

is tor everyone, Irom novice lo expert. Even il you've never 
programmed before. Turbo Tutor will get you started right away 
If you already have some experience with Pascal or another 
programming language. Turbo Tutor will take you step by step 
through topics like data structures and pointers. If you're an expert, 
you'll lovej he sections detailing subjects such as "how lo use assem- 
bly language routines with your Turbo Pascal prog'ams 

A must. You'll find Ihe source code tor all 
the examples in the book on Ihe accompanying 
disk ready to compile. Turbo Tutor might be 
the only reference on Pascal and pro- 
gramming you'll ever need 




K| BORIAHD 
f» INTERNATIONAL 



Turbo Pascal is a registered Sadwart o! Bw lard lilETalrsnai. he 
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$34.95 



Software's Newest Direction 

4585 Scotts Valley Drive 
Scotts Valley. CA 95066 

telex mm 



